R强制数据框中的特殊列#R

Question

我希望将包含特殊列（矩阵或列表）的数据框强制转换为“常规”数据框，其中特殊列已分布在许多列中。我的例子：

df <- data.frame(x = 1:3, y = I(matrix(1:9, nrow = 3)))
str(df)
#> 'data.frame':    3 obs. of  2 variables:
#>  $ x: int  1 2 3
#>  $ y: 'AsIs' int [1:3, 1:3] 1 2 3 4 5 6 7 8 9

我需要将 df 函数应用到 return 以下数据帧：

  x y1 y2 y3
1 1  1  4  7
2 2  2  5  8
3 3  3  6  9

'data.frame':   3 obs. of  4 variables:
 $ x : num  1 2 3
 $ y1: num  1 2 3
 $ y2: num  4 5 6
 $ y3: num  7 8 9

感谢您的帮助

Answer 1

我们可以使用

out <- as.data.frame(do.call(cbind, df))

R强制数据框中的特殊列#R

R coerce special column in a data frame #R

r

coercion

dataframe