rbind фреймы данных на основе общего шаблона в имени фрейма данных
Скажем, у меня есть несколько фреймов данных, которые имеют одинаковые имена векторов, и я хотел бы связать все, которые имеют общий шаблон. Итак, для этих 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 столбцов, который эффективно связывает все, а не связывает.
2 ответа
Решение
Мы можем использовать 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+")))
Ты можешь попробовать:
new_df <- do.call("rbind",mget(ls(pattern = "^df.*")))