объединить несколько dataframes на основе последовательности имен

Question

Say У меня есть 30 dataframes всех названных с датой от 01/01/2000 до 30/01/2000 в формате ddmmyy (код ниже):

Season <- seq(as.Date("2000-01-01"),as.Date("2000-01-30"),1) 
Season <- format(Season,"%d%m%y") 

for (s in Season) { 

    df <- data.frame(X=1:10, Y=1:10) 

    aa <- paste(s,"tests",s ,sep = "_") 

    assign(aa,df) 

} 

Каждого имя, вы канистра видит, есть добавлено к нему слово tests.Я хочу совместить (rbind?) data.frame с учетом даты. В этом случае объедините data.frame с, которые содержат даты от 01-01-00 до 10-01-00.

У меня есть приведенный ниже код, чтобы объединить все данные, но что, если я хочу только выбрать те, что показаны выше?

All_dfs <- do.call(rbind, eapply(.GlobalEnv,function(x) if(is.data.frame(x)) x)) 

Лучше ли создать список в первую очередь?

Answer 1

Мы можем использовать mget, чтобы получить значения «сезона» в list, а затем rbind в list в data.frame с. Поскольку есть суффикс «тестов», за которым следует «Сезон», связанный с «Сезон», мы можем использовать paste, чтобы получить строку, затем используйте mget.

res <- do.call(rbind, mget(paste0(Season[1:10], "_tests_", Season[1:10]))) 
dim(res) 
#[1] 100 2