# NOT RUN {
data(Events)
multi_dates_plot(Events, c(2, 4, 3), level = 0.95, intervals = "CI",
title = "Plot of CI intervals")
multi_dates_plot(Events, c(2, 4, 3), level = 0.95, intervals = "HPD",
title = "Plot of HPD intervals")
multi_dates_plot(Events, c(2, 4, 3), level = 0.95, intervals = "HPD",
order = "increasing")
# }
Run the code above in your browser using DataLab