# NOT RUN {
data(wind_RP)
mod <- cpmSet(formula_l = l ~ Season, formula_s = s ~ Season,
data = wind_RP$CP, left = "LastPresent", right = "FirstAbsent")
# }
# NOT RUN {
plot(mod)
# }
# NOT RUN {
# }
Run the code above in your browser using DataCamp Workspace