Предполагая, что 'date' - это класс Date
, один ption будет complete
library(dplyr)
library(tidyr)
df1 %>%
group_by(state, region) %>%
complete(date = seq(as.Date('2020-02-26'), last(date), by = '1 day')) %>%
ungroup
По умолчанию недостающие даты, добавленные с помощью complete
, будут иметь другие столбцы, то есть 'case', 'смерти' для этих строк как NA
, если мы не изменим с помощью fill
аргумента