Как использовать функцию расширения и фреймы данных левого соединения (DF1, DF2, DF3, до DF 621) в цикле?

Question

У меня есть фреймы данных (DF1, DF2, DF3, DF4 до DF621). Я хочу использовать для них функцию разброса перед левым соединением (по столбцу GEOID) их внутри цикла for.

Я должен наконециметь один фрейм данных, содержащий все мои фреймы данных (от DF1 до DF621).

Каждый DF[i] фрейм данных содержит 4 столбца: normalized, GEOID, Name, variable.

, например,

DF21spread <- spread(DF21, variable, normalized)

test <- spread(DF20, variable, normalized) %>%

  left_join(DF21spread, by ='GEOID')

Answer 1

Решением является сначала rbind data.frames вместе, а затем распространение.

library(dplyr)

DF1 <- iris[1:50, ]
DF2 <- iris[51:100, ]
DF3 <- iris[101:150, ]

dfs <- mget(ls(patter = "DF"))

bind_rows(dfs, .id = 'id')