Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

...

Code Block
dpar(start="2011 jul 17 17:00",lenmin=30,stns=1)
iod = prep(c("w.4.5m#1","h2o.4.5m#1","co2.4.5m#1"),rate=20)
x = readts(iod)
close(iod)
cwh = crosscorr(x[,1:2],lags=c(-1,1))> 
plot(as.numeric(utime(positions(cwh))),cwh,xlab="lag(sec)",ylab="w.4.5m#1:co2.4.5m#1")