After a pivot_wider(), I get the following data.frame.
How can I aggregate the data on the same line?
CODE_C CODE_P LIB_COMPOSANT LIB_PRODUIT `2020-01-01` `2020-02-01` `2020-03-01` `2020-04-01` `2020-05-01` `2020-06-01`
<chr> <chr> <chr> <chr> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
1 FABR**01 FABR** Abricot, 82 Abricot 1.32 NA NA NA NA NA
2 FABR**01 FABR** Abricot, 82 Abricot NA 1.10 NA NA NA NA
3 FABR**01 FABR** Abricot, 82 Abricot NA NA 3.33 NA NA NA
4 FABR**01 FABR** Abricot, 82 Abricot NA NA NA 4.71 NA NA
5 FABR**01 FABR** Abricot, 82 Abricot NA NA NA NA 4.38 NA
6 FABR**01 FABR** Abricot, 82 Abricot NA NA NA NA NA 3.25
要复制数据框,请执行以下操作:
structure(list(CODE_C = c("FABR**01", "FABR**01", "FABR**01",
"FABR**01", "FABR**01", "FABR**01"), CODE_P = c("FABR**", "FABR**",
"FABR**", "FABR**", "FABR**", "FABR**"), LIB_COMPOSANT = c("Abricot, 82",
"Abricot, 82", "Abricot, 82", "Abricot, 82", "Abricot, 82", "Abricot, 82"
), LIB_PRODUIT = c("Abricot", "Abricot", "Abricot", "Abricot",
"Abricot", "Abricot"), `2020-01-01` = c(1.32446153846154, NA,
NA, NA, NA, NA), `2020-02-01` = c(NA, 1.09984615384615, NA, NA,
NA, NA), `2020-03-01` = c(NA, NA, 3.33157894736842, NA, NA, NA
), `2020-04-01` = c(NA, NA, NA, 4.70916279069767, NA, NA), `2020-05-01` = c(NA,
NA, NA, NA, 4.37848648648649, NA), `2020-06-01` = c(NA, NA, NA,
NA, NA, 3.24713953488372)), row.names = c(NA, -6L), class = c("tbl_df",
"tbl", "data.frame"))
初始Pivot_Wide()如下所示:
pivot_wider(DONNEES_COMPOSANT,
names_from = date,
values_from = PRIX)
预期输出:
CODE_C CODE_P LIB_COMPOSANT LIB_PRODUIT `2020-01-01` `2020-02-01` `2020-03-01` `2020-04-01` `2020-05-01` `2020-06-01`
<chr> <chr> <chr> <chr> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
1 FABR**01 FABR** Abricot, 82 Abricot 1.32 1.10 3.33 4.71 4.38 3.25