R语言如何将数据框列值逐行追加到同行列表列开头

你的需求是对数据框lib中，逐行将a列的单个取值插入到同行b列存储的向量最前端，以下是两种可直接运行的实现方式：

方法1：Base R 无依赖实现 #

不需要安装加载任何第三方包，直接利用内置的Map函数做逐行映射拼接即可，代码简洁效率高：

# --------------- 示例数据构造（你自己的环境里不需要跑这部分）---------------
lib <- data.frame(
  a = c("couch", "table"),
  b = I(list(
    c("apple", "pear", "orange"),
    c("lemon", "lime", "banana")
  ))
)

# --------------- 核心处理代码 ---------------
lib$b <- Map(c, lib$a, lib$b)

核心逻辑：Map会按索引逐次取出lib$a的单个值、lib$b对应位置的列表元素，传入拼接函数c()，自动将a列值放在向量首位，返回结果直接赋值给b列即可，最终b列保持原有列表列结构，和预期输出完全一致。

方法2：Tidyverse 生态实现 #

如果你日常使用tidyverse语法做数据处理，可以用dplyr的行式操作完成，注意必须开启行式计算避免向量循环错位：

library(dplyr)

lib <- lib %>%
  rowwise() %>%
  mutate(b = list(c(a, b))) %>%
  ungroup()

• rowwise()：将数据框切换为逐行计算模式，保证每次取的a、b都是当前行对应的值
• list(c(a,b))：拼接后用list包裹，确保b列保持列表列结构不会被拆成多行
• ungroup()：处理完成后取消行式分组，恢复普通data.frame/tibble的操作逻辑

两种方法运行后得到的结果完全匹配预期：

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