如何向data.frame的多列末尾追加相同的一组值？

要实现将同一组值追加到数据框每一列的末尾，核心是构造一个和原数据框列数一致、每列均为目标向量的新数据框，再通过rbind()完成合并。

步骤1：统一数据类型（推荐） #

原向量为字符型，而数据框列是数值型，先转换向量类型避免列被强制转为字符型：

five_values <- as.numeric(c("17", "93", "119", "399", "439"))

步骤2：构造待追加的新数据框 #

方法一：手动指定列（适合列数少的场景）

直接创建与原数据框列名匹配的新数据框，每列赋值为five_values：

new_rows <- data.frame(
  Col1 = five_values,
  Col2 = five_values,
  Col3 = five_values
)

方法二：通用写法（适配任意列数）

用lapply()遍历原数据框的列，自动生成结构完全匹配的新数据框：

new_rows <- as.data.frame(lapply(df, function(col) five_values))

步骤3：合并数据框 #

用rbind()将原数据框和新数据框合并：

df_updated <- rbind(df, new_rows)

你之前的错误原因 #

1. 直接rbind(df, five_values)：rbind()要求新增行的长度必须等于数据框的列数，你的向量长度为5，而数据框仅3列，长度不匹配导致报错；且该写法是试图添加1行，并非需求的5行。
2. for循环写法：循环内仍在执行rbind(df[,1:3], output)，同样存在长度不匹配问题，且循环未保存每次的运算结果，最终无法生成正确的合并数据框。

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