| excess_plot | R Documentation | 
Plot results from fitted excess count model
excess_plot(fit, title = "", ylim = NULL, show.data = TRUE, alpha = 0.05)
| fit | The output from 'excess_model' | 
| title | A title to add to plot | 
| ylim | A vector with two numbers that determines the kimits for the y-axis | 
| show.data | A logical that determines if the observed percent changes are shown | 
| alpha | 1 - 'alpha' confidence intervals are shown | 
An ggplot object containing the plot.
data(new_jersey_counts)
exclude_dates <- as.Date("2012-10-29") + 0:180
control_dates <- seq(min(new_jersey_counts$date), min(exclude_dates) - 1, by = "day")
f <- excess_model(new_jersey_counts,
start = as.Date("2012-09-01"), 
end = as.Date("2013-09-01"), 
exclude = exclude_dates,
model = "correlated",
weekday.effect = TRUE,
control.dates = control_dates)
library(ggplot2)
excess_plot(f)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.