rbind 数据框基于数据框名称中的通用模式

Question

假设我有多个数据帧，它们都具有相同的向量名称，我想 cbind 所有具有共同模式的数据帧。所以对于这 3 个数据框：

df.1 <- data.frame(column1 = factor(sample(c("Male","Female"), 10, replace=TRUE)),
                   speed=runif(10))
df.2 <- data.frame(column1 = factor(sample(c("Male","Female"), 10, replace=TRUE)),
                   speed=runif(10))
df.3 <- data.frame(column1 = factor(sample(c("Male","Female"), 10, replace=TRUE)),
                   speed = runif(10))

我想rbind所有具有共同模式的东西"df.*"

我已经尝试创建一个列表，然后使用以下方法从中创建一个数据框：

temp <- lapply(ls(pattern = "df.*"), get) 
temp2<- as.data.frame(temp)

然而，这只会产生一个 6 列的数据框，有效地 cbinding 整个事物而不是 rbinding。

Answer 1

我们可以使用 ls 和 mget

library(data.table)
rbindlist(mget(ls(pattern = "^df\.\d+")))

或 dplyr

library(dplyr)
mget(ls(pattern="^df\.\d+")) %>%
              bind_rows()

或 rbind 来自 base R

do.call(rbind, mget(ls(pattern="^df\.\d+")))

Answer 2

你可以试试：

new_df <- do.call("rbind",mget(ls(pattern = "^df.*")))

rbind 数据框基于数据框名称中的通用模式

rbind data frames based on a common pattern in data frame name

r

apply

dataframe

rbind