如何快速将RStudio全局环境中70个变量转为每变量对应一列的数据框？

当然有快速实现的办法！这里有几个高效的方案，你可以根据自己的使用习惯来选：

方案1：Base R 原生实现 #

如果你的变量没有特定命名规律，或者想精准筛选出长度为1500的变量，可以用 mget() 配合 ls() 来批量获取变量，再转换为数据框：

# 筛选全局环境中所有长度为1500的变量
target_vars <- ls(envir = .GlobalEnv)[sapply(ls(envir = .GlobalEnv), function(x) length(get(x)) == 1500)]
# 合并为数据框
combined_df <- data.frame(mget(target_vars))

如果能确定全局环境里的所有变量都是长度1500的，那可以简化成一行：

combined_df <- data.frame(mget(ls()))

方案2：tidyverse 简洁写法 #

如果你平时习惯用dplyr这类tidyverse工具，bind_cols() 可以直接帮你按列合并多个对象：

library(dplyr)

# 先筛选目标变量（可选步骤）
target_vars <- mget(ls()[sapply(ls(), function(x) length(get(x)) == 1500)])
# 按列绑定成数据框
combined_df <- bind_cols(target_vars)

实用小提示 #

• 如果你的变量有统一命名前缀（比如var1、var2...var70），可以直接通过命名规则指定变量，不用遍历所有全局变量：

  combined_df <- data.frame(mget(paste0("var", 1:70)))
  

• 合并完成后，建议用str(combined_df)检查数据结构，确认每列长度都是1500，避免出现异常情况。

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