基于数据帧名称中的公共模式来rbind数据帧

Question

假设我有多个数据框,它们都有相同的矢量名称,我想cbind所有具有commmon模式的数据框.所以对于这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列的数据帧,有效地整合了整个事物而不是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.*")))