data(dmCD)
dm.phase <- phase_def(dmCD)
phase_plot(dmCD, dm.phase)
# zoom in on the dendrometer series
phase_plot(dmCD, dm.phase, period = c(133, 142))
# customization options
phase_plot(dmCD, dm.phase, period = c("2008-05-12", "2008-05-22"),
colPhases = c("green", "cyan", "orange"),
pch = 4, main = "Dendrometer", ylab = "Values")
# specific sensors may be selected as follows:
# \donttest{
data(dmED)
dm.gpf <- fill_gaps(dmED)
dm.phase <- phase_def(dm.gpf)
phase_plot(dm.gpf, dm.phase, sensor = 1)
phase_plot(dm.gpf, dm.phase, sensor = c(2,1))
phase_plot(dm.gpf, dm.phase, sensor = "Beech03")
phase_plot(dm.gpf, dm.phase, sensor = c("Beech03", "Beech04"))
# }
Run the code above in your browser using DataLab