Слияние нескольких файлов csv в R

Question

У меня есть около 100 файлов csv с общими заголовками, которые я хочу объединить. Заголовки - «Lat», «Long» и «value». Я пытаюсь объединить все файлы CSV, так что результат будет

"Lat" "Lon" "Value1" "Value2"..."Value 100" 

Lat и Lon колонны одинаковы для всех файлов CSV. Объединение двух файлов легко

merge(data.frame1, data.frame2, by=c('Lat','Lon')) 

Однако, я попытался следующий код, который не работал:

file_list <- list.files(~/source) 
list_of_files <- lapply(file_list, read.csv) 
m1 <- merge_all(list_of_files, by=c("Lat","Lon"), all=TRUE) 

, который бросает ошибку

Error in merge.data.frame(dfs[[1]], Recall(dfs[-1]), all = TRUE, sort = FALSE, : 
    formal argument "all" matched by multiple actual arguments. 

Может кто-нибудь помочь мне в этом отношении.

Answer 1

Вы можете использовать Reduce и простой merge:

m1 <- Reduce(function(old, new) { merge(old, new, by=c('Lat','Lon')) }, list_of_files) 

Answer 2

Это может работать хорошо, но вы не дали нам никаких данных для работы с. Я лично использую способ dbaupp и не уверен, какой из них быстрее; тем не менее, я редко попадаю в большие данные, поэтому метод «С уменьшением» намного облегчает мне работу с таким путем (я выпускаю новый R-пакет через несколько месяцев, у которого есть функция, чтобы делать мультимерж, основанный на принципе по тому же мышлению, что и ответ дбауппа). Если вы имеете дело с большими данными, вы можете захотеть пометить два (PS, я украл это откуда-то, поскольку я редко думаю в циклах для решения проблем, но не могу указать, где).

DF <- list_of_files[[1]][, c('lat', 'Lon')] 
    for (.df in list_of_files) { 
    DF <-merge(DF,.df,by=c('Lat', 'Lon'), all=T, suffixes=c("", "")) 
} 
DF