Re: [R-br] "Append" arquivos csv de diversos subdiretórios

2016-09-22 Por tôpico Alexandre Loures via R-br 

Resolvido pessoal.


Muito obrigado!




Em 22/09/2016 15:39, Éder Comunello escreveu:

Boa tarde, pessoal.

Dependendo da situação poderá utilizar também o argumento full.names=T.

list.files("DADOS", recursive=T)
# [1] "CSV1/Text1.csv" "CSV1/Text2.csv" "CSV2/Text3.csv"

list.files("DADOS", recursive=T, full=T)
# [1] "DADOS/CSV1/Text1.csv" "DADOS/CSV1/Text2.csv" "DADOS/CSV2/Text3.csv"

dir("DADOS", recursive=T, full=T)
# [1] "DADOS/CSV1/Text1.csv" "DADOS/CSV1/Text2.csv" "DADOS/CSV2/Text3.csv"



Éder Comunello
Researcher at Brazilian Agricultural Research Corporation (Embrapa)
DSc in Agricultural Systems Engineering (USP/Esalq)
MSc in Environ. Sciences (UEM), Agronomist (UEM)
---
Embrapa Agropecuária Oeste, Dourados, MS, Brazil ||

GEO, -22.2752, -54.8182, 408m
UTC-04:00 / DST: UTC-03:00




2016-09-22 11:38 GMT-04:00 Thiago V. dos Santos via R-br 
mailto:r-br@listas.c3sl.ufpr.br>>:


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
mailto: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.




--
*Alexandre Rodrigues Loures*
Doutorando em Economia Aplicada
Universidade Federal da Paraíba - UFPB
Centro de Ciências Sociais Aplicadas - CCSA
Programa de Pós-Graduação em Economia - PPGE
Site: www.ccsa.ufpb.br/ppge
orcid www.orcid.org/-0002-1288-0135
___
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�a c�digo 
m�nimo reproduz�vel.

Re: [R-br] "Append" arquivos csv de diversos subdiretórios

2016-09-22 Por tôpico Éder Comunello via R-br 
Boa tarde, pessoal.

Dependendo da situação poderá utilizar também o argumento full.names=T.

list.files("DADOS", recursive=T)
# [1] "CSV1/Text1.csv" "CSV1/Text2.csv" "CSV2/Text3.csv"

list.files("DADOS", recursive=T, full=T)
# [1] "DADOS/CSV1/Text1.csv" "DADOS/CSV1/Text2.csv" "DADOS/CSV2/Text3.csv"

dir("DADOS", recursive=T, full=T)
# [1] "DADOS/CSV1/Text1.csv" "DADOS/CSV1/Text2.csv" "DADOS/CSV2/Text3.csv"



Éder Comunello
Researcher at Brazilian Agricultural Research Corporation (Embrapa)
DSc in Agricultural Systems Engineering (USP/Esalq)
MSc in Environ. Sciences (UEM), Agronomist (UEM)
---
Embrapa Agropecuária Oeste, Dourados, MS, Brazil ||

GEO, -22.2752, -54.8182, 408m
UTC-04:00 / DST: UTC-03:00




2016-09-22 11:38 GMT-04:00 Thiago V. dos Santos via R-br <
r-br@listas.c3sl.ufpr.br>:

> 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.
___
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�a c�digo 
m�nimo reproduz�vel.

Re: [R-br] "Append" arquivos csv de diversos subdiretórios

2016-09-22 Por tôpico Thiago V. dos Santos via R-br 
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 
 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.

Re: [R-br] "Append" arquivos csv de diversos subdiretórios

2016-09-22 Por tôpico Raphael Saldanha via R-br 
Olá Alexandre,

O comando list.dirs() lista todos os arquivos dentro de diretórios e
subdiretórios à partir do atual. Se você estiver na diretório principal do
seu projeto:

filenames <- list.dirs()

2016-09-22 8:58 GMT-03:00 Alexandre Loures via R-br <
r-br@listas.c3sl.ufpr.br>:

> 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ça
> código mínimo reproduzível.
>
___
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�a c�digo 
m�nimo reproduz�vel.