r - 添加 value=0 的行，以按组 dplyr R 具有相同的行数

Question

我有一个数据框，其中包含按国家/地区分组和包含日期的行，在某些国家/地区没有某些日期的行，我想用 0 值填充这些缺失的行

例如:

dd <- tibble( region=rep("Aus",8), date=c("2000-11-01","2000-12-01","2001-01-01","2001-02-01","2001-03-01","2001-04-01","2001-05-01","2001-06-01"), value=runif(8))
dd <- bind_rows(dd,tibble( region=rep("Est",6), date=c("2000-11-01","2001-01-01","2001-02-01","2001-04-01","2001-05-01","2001-06-01"), value=runif(6)))

我需要为缺少日期 2000-12-01 2001-03-01 和 的组 Est 添加两行>值=0

我不知道如何使用 dplyr 或 base 来实现一般情况

Answer 1

dd %>%
  pivot_wider(names_from = date, values_fill = 0) %>%
  pivot_longer(cols = -region)

给出:

# A tibble: 16 x 3
   region name        value
   <chr>  <chr>       <dbl>
 1 Aus    2000-11-01 0.313 
 2 Aus    2000-12-01 0.842 
 3 Aus    2001-01-01 0.314 
 4 Aus    2001-02-01 0.757 
 5 Aus    2001-03-01 0.968 
 6 Aus    2001-04-01 0.169 
 7 Aus    2001-05-01 0.697 
 8 Aus    2001-06-01 0.873 
 9 Est    2000-11-01 0.132 
10 Est    2000-12-01 0     
11 Est    2001-01-01 0.0785
12 Est    2001-02-01 0.378 
13 Est    2001-03-01 0     
14 Est    2001-04-01 0.580 
15 Est    2001-05-01 0.536 
16 Est    2001-06-01 0.109