R语言中bind_cols()的反向操作：将数据框拆分为列列表的高效实现

核心实现方法 #

直接使用R原生函数as.list()即可实现需求，无需引入额外依赖，执行效率最优：

• 数据框本质是由等长列向量组成的列表结构，as.list()仅做基础类型转换，无额外计算开销
• 自动保留原数据框的列名作为列表元素名，输出完全符合要求

示例验证 #

library(tidyverse)
# 构造示例数据框
x <- 1:5
y <- letters[1:5]
d <- tibble(x, y)

# 转换为目标列表
output <- as.list(d)
output

输出结果和期望完全一致：

$x
[1] 1 2 3 4 5

$y
[1] "a" "b" "c" "d" "e"

管道场景用法 #

你示例中缺失的转换函数直接替换为as.list()即可正常运行：

d %>%
  as.list() %>% 
  pmap(function(x, y) paste(x, y))

该用法也支持任意列数的数据框，不需要调整代码即可适配ncol>2的场景。

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