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

≡放荡痞女 提交于 2019-12-19 03:22:20

问题


Say I have multiple data frames which all have identical vector names and I'd like to cbind all which have a commmon pattern. So for these 3 data frames:

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))

I would like to rbind everything with the common pattern "df.*"

I have tried creating a list and then creating a data-frame from this using:

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

However this only produces a data frame of 6 columns effectively cbinding the whole thing rather than rbinding.


回答1:


We can use ls with mget

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

Or with dplyr

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

Or with rbind from base R

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



回答2:


You can try:

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


来源:https://stackoverflow.com/questions/41811675/rbind-data-frames-based-on-a-common-pattern-in-data-frame-name

易学教程内所有资源均来自网络或用户发布的内容,如有违反法律规定的内容欢迎反馈
该文章没有解决你所遇到的问题?点击提问,说说你的问题,让更多的人一起探讨吧!