如何在R中用dplyr向数据框每行添加指定向量？

首先，你遇到的报错原因很明确：dplyr的mutate要求新列的长度要么和数据框行数一致（这里是3），要么是长度为1的标量。直接传入长度为4的c(1,2,3,4)，长度不匹配，所以触发了报错。

要实现每行都添加同一个长度为4的向量，你可以用下面两种实用方法：

方法1：用dplyr结合rep(list(...))实现 #

library(dplyr)
myLines=" Greek alpha beta gamma "
myData <- read.table(text=myLines, header=TRUE)

# 关键是把目标向量包装成列表元素，再重复对应行数
myData <- myData %>% 
  mutate(justSomeVector = rep(list(c(1,2,3,4)), nrow(myData)))

print(myData)

运行后输出结果：

Greek justSomeVector
1 alpha      1, 2, 3, 4
2 beta       1, 2, 3, 4
3 gamma      1, 2, 3, 4

方法2：基础R更简洁的写法 #

如果不想依赖dplyr，直接用基础R的赋值方式更简单：

myLines=" Greek alpha beta gamma "
myData <- read.table(text=myLines, header=TRUE)

# 直接给列赋值一个包含目标向量的列表，R会自动广播到所有行
myData$justSomeVector <- list(c(1,2,3,4))

print(myData)

两种方法的核心逻辑一致：把目标向量作为列表的单个元素，这样R就不会把它拆分成单个值，而是将整个向量作为每行的单元格内容，完美匹配你想要的效果。

内容的提问来源于stack exchange，提问作者nexonvantec