search

reconhub / incidence

☣:chart_with_upwards_trend::chart_with_downwards_trend:☣ Compute and visualise incidence
https://reconhub.github.io/incidence
Other
58 stars 13 forks source link

estimate_peak fails for non-date incidence #63

Closed zkamvar closed 6 years ago

zkamvar commented 6 years ago 
library(incidence)
set.seed(999)
x <- rpois(100, 10)
i <- incidence(x)
find_peak(i)
#> [1] 10
estimate_peak(i)
#> Error in quantile_Date(peak_boot, c(alpha/2, 1 - alpha/2)): 'x' is not a 'Date' object

Created on 2018-09-11 by the reprex package (v0.2.0).