r - 将长格式分组数据转换为宽格式

Question

我目前有长格式数据

# Input
library(dplyr)
library(tidyr)

tibble(
    x = c(1,1,2,2), 
    y = c("A", "B", "C", "D")
) 

我想将数据扩展为如下所示:

# Desired Output
tibble(
    x = c(1,2), 
    x_1 = c("A", "C"), 
    x_2 = c("B", "D")
) 

但这不是典型的 tidyr::spread()，因为我的列名没有变成单元格值。所以虽然这看起来很简单，但我很难过。

Answer 1

library(data.table)

dcast(df, x ~ paste0('x_', rowid(x)))
#   x x_1 x_2
# 1 1   A   B
# 2 2   C   D