[R] Rolling 7 day incidence
PIKAL Petr
petr@p|k@| @end|ng |rom prechez@@cz
Tue Aug 17 12:46:19 CEST 2021
Hi.
There are several ways how to do it. You could find them easily using Google. e.g.
https://stackoverflow.com/questions/19200841/consecutive-rolling-sums-in-a-vector-in-r
where you find several options.
Cheers
Petr
> -----Original Message-----
> From: R-help <r-help-bounces using r-project.org> On Behalf Of Dr Eberhard
> Lisse
> Sent: Tuesday, August 17, 2021 12:25 PM
> To: r-help using r-project.org
> Subject: [R] Rolling 7 day incidence
>
> Hi,
>
> I am loading the coronavirus dataset everyday which looks something like:
>
>
> as_tibble(coronavirus) %>%
> filter(country=="Namibia" & type=="confirmed") %>%
> arrange(desc(date)) %>%
> print(n=10)
>
> # A tibble: 573 × 7
> date province country lat long type cases
> <date> <chr> <chr> <dbl> <dbl> <chr> <dbl>
> 1 2021-08-16 "" Namibia -23.0 18.5 confirmed 76
> 2 2021-08-15 "" Namibia -23.0 18.5 confirmed 242
> 3 2021-08-14 "" Namibia -23.0 18.5 confirmed 130
> 4 2021-08-13 "" Namibia -23.0 18.5 confirmed 280
> 5 2021-08-12 "" Namibia -23.0 18.5 confirmed 214
> 6 2021-08-11 "" Namibia -23.0 18.5 confirmed 96
> 7 2021-08-10 "" Namibia -23.0 18.5 confirmed 304
> 8 2021-08-09 "" Namibia -23.0 18.5 confirmed 160
> 9 2021-08-08 "" Namibia -23.0 18.5 confirmed 229
> 10 2021-08-07 "" Namibia -23.0 18.5 confirmed 319
> # … with 563 more rows
>
> How do I do a rolling 7 day incidence (ie sum the cases over 7 days) but
> rolling, ie from the last day to 7 (or 6?) days before the end of the dataset, so
> I get pairs of date/7-Day-Incidence?
>
> I know it's probably re-inventing the plot as it were but I can't find R code to
> do that.
>
> I want to plot it per 100000 but that I can do.
>
> greetings, el
>
>
> --
> To email me replace 'nospam' with 'el'
>
> ______________________________________________
> R-help using r-project.org mailing list -- To UNSUBSCRIBE and more, see
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide http://www.R-project.org/posting-
> guide.html
> and provide commented, minimal, self-contained, reproducible code.
More information about the R-help
mailing list