<div dir="ltr">vc vai precisar carregar o pacote stringr<div><br></div><div>library(stringr)<br></div></div><div class="gmail_extra"><br><br><div class="gmail_quote">2014-03-10 15:20 GMT-03:00 Alisson Lucrecio <span dir="ltr"><<a href="mailto:alissonluc@gmail.com" target="_blank">alissonluc@gmail.com</a>></span>:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir="ltr">Eu não uso loop, mas acho que isso o ajudaria.<div><br></div><div><div># Importanto dados</div><div><br>
</div><div>import_files <- function(){</div><div> folder <- "Dados semanais csv"</div>
<div> files <- list.files(folder, pattern = ".csv")</div><div> files.names <- gsub(".csv", "", files)</div><div> </div><div> file.read <- function(<a href="http://file.name" target="_blank">file.name</a>){</div>
<div> read.csv(paste("./", folder,"/", <a href="http://file.name" target="_blank">file.name</a>, ".csv", sep =""), sep = ";", header=TRUE, encoding = "latin1")</div>
<div> }</div>
<div> </div><div> list.files <- lapply(files.names, function(<a href="http://file.name" target="_blank">file.name</a>){</div><div> file <- file.read(<a href="http://file.name" target="_blank">file.name</a>)</div>
<div> })</div><div> names(list.files)[1:length(list.files)] <- gsub("_PA", "", files.names)</div>
<div> return(list.files)</div><div>}</div><div><br></div><div>temp_list_file <- import_files()</div></div><div><br></div><div>Att.</div></div><div class="gmail_extra"><br><br><div class="gmail_quote">2014-03-10 15:16 GMT-03:00 Ricardo Solar <span dir="ltr"><<a href="mailto:rrsolar@gmail.com" target="_blank">rrsolar@gmail.com</a>></span>:<div>
<div class="h5"><br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir="ltr">Olá;<div><br></div><div>Se entendi bem, no lugar de "base_x.csv", pode colocar um loop com paste("base_",i,".csv"), sendo <i>i </i>o fator de iteração do loop. </div>
<div><br></div>
<div>Abs</div></div><div class="gmail_extra"><br clear="all"><div><div dir="ltr"><font color="#666666">==========================================<br>Ricardo Ribeiro de Castro Solar (<a href="http://lattes.cnpq.br/9924177207371692" target="_blank">Curriculum Vitœ</a>)</font><div>
<font color="#666666">PPG em Entomologia - UFV (Doutorado)<br><a href="http://photographyandconservation.wordpress.com/" target="_blank">Visit my blog!</a> / </font><a href="http://www.redeamazoniasustentavel.org" target="_blank">Rede Amazônia Sustentável</a><div>
<span style="color:rgb(102,102,102)">Skype: rrsolar</span><div><span style="color:rgb(102,102,102)">Universidade Federal de Viçosa</span><div><font color="#666666">========================================== </font></div>
</div>
</div></div></div></div>
<br><br><div class="gmail_quote">2014-03-10 14:06 GMT-03:00 Gerson R. Primo Jr <span dir="ltr"><<a href="mailto:gersonprimo@gmail.com" target="_blank">gersonprimo@gmail.com</a>></span>:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
<div><div>
<div dir="ltr"><div class="gmail_default" style="font-size:small;font-family:verdana,sans-serif"><br>Oi pessoal,<br><br>Recebo vários arquivos e preciso uni-los no R. Atualmente faço da seguinte forma:<br>
<br>total = rbind(read.csv("base_1.csv", sep=";"),<br> read.csv("base_2.csv", sep=";"),<br> read.csv("base_3.csv", sep=";"),<br>
read.csv("base_4.csv", sep=";"),<br>
read.csv("base_5.csv", sep=";")<br> ) <br><br>Acontece
que recebo esses arquivos semanalmente e a quantidade de arquivo varia
(25 a 50), Alguém sabe como posso criar um 'for' que declare a
quantidade de arquivo o R faz esse loop?<br><br><br clear="all"></div><div><div dir="ltr"><font style="font-family:arial,helvetica,sans-serif" face="'comic sans ms', sans-serif"><font><i><span style="font-family:verdana,sans-serif">Att,<br>
Gerson R. Primo Jr</span></i></font><b><br></b><br></font></div></div>
</div>
<br></div></div>_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br></blockquote></div><br></div>
<br>_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br></blockquote></div></div></div><span class="HOEnZb"><font color="#888888"><br>
<br clear="all"><div><br></div>-- <br>
<div dir="ltr">Alisson Lucrecio da Costa</div>
</font></span></div>
</blockquote></div><br><br clear="all"><div><br></div>-- <br><div dir="ltr">Alisson Lucrecio da Costa</div>
</div>