Alexandre,

Basta usar o argumento "recursive" no seu comando list.files:

filenames <- list.files (".", recursive=T)
 
Greetings,
 -- Thiago V. dos Santos

PhD student
Land and Atmospheric Science
University of Minnesota


On Thursday, September 22, 2016 6:58 AM, Alexandre Loures via R-br 
<r-br@listas.c3sl.ufpr.br> wrote:



Bom dia!

Tenho um diretório com 50 subdiretórios sendo que cada um possui 11 arquivos 
csv. O que preciso é "empilhar" esses arquivos (em um único arquivo) e para 
isso estou fazendo o seguinte:


filenames <- list.files ()
mydata <- do.call ("rbind", lapply (filenames, read.csv, header = TRUE))


Entretanto, gostaria de "automatizar" esse script, ou seja, o próprio comando 
fosse em cada subdiretório e fizesse o "append" (dos 550 arquivos csv) dando o 
resultado final.

Alguém poderia me ajudar?


Desde já muito obrigado!  

_______________________________________________
R-br mailing list
R-br@listas.c3sl.ufpr.br
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forne� c�igo m�imo 
reproduz�el.
_______________________________________________
R-br mailing list
R-br@listas.c3sl.ufpr.br
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e fornea cdigo mnimo 
reproduzvel.

Responder a