Есть ли простой способ транспонировать фрейм данных, группируя значения одного из их столбцов?

Question

У меня есть следующий кадр данных:

      df <- data.frame(group = c("A","A","A","B","B","C","C","C"), 
            year = c("2018","2019","2020", "2019","2020","2019","2020","2021"),
            amount = c(10,20,30,40,50,60,70,80))

и я хотел бы получить следующий целевой кадр данных:

      target.df <- data.frame(group = c("A","B","C"), 
                   "2018" = c(10,0,0), "2019"= c(20,40,60),
                   "2020"=c(30, 50, 70),"2021" = c(0, 0, 80))

до сих пор я разделяю свои данные с помощью разделения (df, df$group) и генерирую данные построчно. Я знаю, что это крайне неэффективно, и мне хотелось бы знать, есть ли более быстрый и простой способ, спасибо!

Answer 1

Это типичная поворотная операция. Мы можем использоватьtidyr::pivot_wider

      library(tidyr)

df |> 
    pivot_wider(names_from = year,
                values_from = amount,
                values_fill = 0,
                names_glue = "X{year}")

# A tibble: 3 × 5
  group X2018 X2019 X2020 X2021
  <chr> <dbl> <dbl> <dbl> <dbl>
1 A        10    20    30     0
2 B         0    40    50     0
3 C         0    60    70    80