r - 如何使用列标题按组转置 R 中的数据框

Question

我正在使用如下所示的数据框，我需要根据通用 ID 按组转置该数据框:

testDF = data.frame(c("Id", "1", "1", "2", "2"), c("Item", 'Milk','Eggs','Bacon', "Bread"))
testDF

#>Id                               Item
#>1                                Milk
#>1                                Eggs
#>2                                Bacon
#>2                                Bread

newDT <- dcast(testDF, Id ~ Item, value.var = "Item")
View(newDT)

我需要输出如下所示(完全排除标题行和 Id 列):

Milk, Eggs (Id 1)
Bacon, Bread (Id 2)

我收到错误“错误:在输入中找不到 value.var (Item)”。你能告诉我我做错了什么吗？

谢谢，马特

Answer 1

上面有一些很好的答案，但我认为这也应该列为一个选项:

df %>%
  group_by(Id) %>%
  # Create string listing all items in given Id, separated by comma
  summarise(Items = str_c(Item, collapse = ', '))

返回:

# A tibble: 2 × 2
      Id         Items
  <fctr>         <chr>
       1    Milk, Eggs
       2  Bacon, Bread