R将数据框列作为向量合并到新列答案

【问题标题】：R merge data frame columns to a new column as a vectorR将数据框列作为向量合并到新列
【发布时间】：2023-04-11 05:30:02
【问题描述】：

我需要将数据框的所有列合并到一个新列中，该列将包含其他列中值的向量（列表）。像这样的

n = c(2, 3, 5) 
s = c(3,3,5)
b = c(1,1,1)
df = data.frame(n, s, b)

  n s b
1 2 3 1
2 3 3 1
3 5 5 1

我想运行一个命令，给我这样的东西：

  n s b   v
1 2 3 1 [2,3,1]
2 3 3 1 [3,3,1]
3 5 5 1 [5,5,1]

基本上是这样的

t(as.numeric(df[1,1:3]))
       [,1] [,2] [,3]
[1,]    2    3    1

得到我想要的一行，但我不知道如何为所有行添加它。我尝试了各种apply 功能，但没有取得多大成功。

谢谢。

【问题讨论】：

df$v <- apply(df, 1, function(x) paste(x, collapse = ', '))怎么样
谢谢。我之前尝试过粘贴，但它创建了一个字符串而不是一个向量/数字列表。我需要数字。
那么使用list 而不是paste？
这个可以df$v <- as.list(as.data.frame(t(df)))
还有df$v <- split(as.matrix(df),rownames(df))

标签： r

【解决方案1】：

这是一个鲜为人知的功能，您可以将矩阵附加到数据帧：

> df[4] <- data.matrix(df)
> df
  n s b V4.n V4.s V4.b
1 2 3 1    2    3    1
2 3 3 1    3    3    1
3 5 5 1    5    5    1
> df[4]
  V4.n V4.s V4.b
1    2    3    1
2    3    3    1
3    5    5    1
> df[4,1]    # note that the 4th "column" actually a list needs to be addresses as a whole:
[1] NA   # the 
> df[4][ 1, ]
     n s b
[1,] 2 3 1

如果要提取单个元素，需要先用“[[”进行提取：

> df[[4]][ , 1 ]
[1] 2 3 5

【讨论】：

它有时会出现在旧代码中。 print-输出可能有点混乱，因为矩阵列不是单独提供的。我觉得大多数编码人员现在不使用它，但我认为它作为一种编码策略比将这些编码为列表列表更“稳定”。