<div dir="auto"><div>Se VC sabe qual os arquivos VC precisa let, certo? Deixe somente eles no seu objeto listas.</div><div dir="auto"><br></div><div dir="auto">Daniel<br><br><div class="gmail_quote" dir="auto"><div dir="ltr" class="gmail_attr">On Mon, 18 May 2020, 18:11 Mauro Sznelwar por (R-br), <<a href="mailto:r-br@listas.c3sl.ufpr.br">r-br@listas.c3sl.ufpr.br</a>> wrote:<br></div><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div><span style="font-size:medium;color:#0000ff">Tem o data set para rodar?</span></div>
<div> </div>
<div><br><br></div>
<div> </div>
<div style="font-family:bookman old style,new york,times,serif;font-size:16px">
<div style="font-size:16px" dir="ltr">Lista, bom dia e boa semana!!! Criei o "reproduzível" para explicar a dúvida. Nesse exemplo, de uma pasta, identifiquei arquivos "*.csv", e depois apliquei o <strong>lapply</strong> e o <span><span style="color:#000000;font-family:bookman old style,new york,times,serif;font-size:16px"><strong>do.call</strong> </span></span>para importar e juntar esses bancos:</div>
<div dir="ltr">
<div>
<div style="font-size:16px"> </div>
<div><span style="color:#cd232c;font-size:small">dir.create('c:/users/diogo/desktop/bancosex/')</span></div>
<div><span style="color:#cd232c;font-size:small">banco1=data.frame(cbind(c("Diogo","Patrícia"),c(42,40),c(5000,7000)))</span></div>
<div dir="ltr">
<div>
<div><span style="color:#cd232c">write.csv2(banco1,file='c:/users/diogo/desktop/bancosex/banco1.csv',row.names=FALSE)</span></div>
<div><span style="color:#cd232c">banco2=data.frame(cbind(c("João","Alexandre"),c(41,40),c(8000,9000)))<br></span></div>
<div><span style="color:#cd232c">write.csv2(banco2,file='c:/users/diogo/desktop/bancosex/banco2.csv',row.names=FALSE)</span></div>
<div><span style="color:#cd232c">banco3=data.frame(cbind(c("Angélica","Nádia"),c(40,38),c(9500,7500)))<br></span></div>
<div><span style="color:#cd232c">write.csv2(banco3,file='c:/users/diogo/desktop/bancosex/banco3.csv',row.names=FALSE)</span></div>
<div><span style="color:#cd232c"> </span></div>
<div><span style="color:#cd232c">setwd('c:/users/diogo/desktop/bancosex/')<br></span></div>
<div><span style="color:#cd232c">lista<-list.files()</span></div>
<div><span style="color:#cd232c">arquivos<-lapply(lista, function(x) read.csv2(x, header=TRUE, sep=";")) </span></div>
<div><span style="color:#cd232c">dados<-do.call("rbind", arquivos) </span></div>
<div> </div>
</div>
</div>
<div dir="ltr">Meu problema: esse código vai "pegar" TODOS os bancos da pasta antes de importar e juntar. Eu gostaria de pegar somente PARTE desses bancos (ex: apenas banco1 e banco2, apenas banco2 e banco3...).</div>
<div dir="ltr"> </div>
<div dir="ltr">Alguém saberia como fazer isso?</div>
<div dir="ltr"> </div>
<div dir="ltr">Obrigado!!! </div>
</div>
</div>
<div style="font-size:16px" dir="ltr"> </div>
<div style="font-size:16px">
<div style="font-family:Helvetica,Arial,sans-serif;font-size:16px">
<div style="margin-bottom:0.0001pt;padding:0px;line-height:normal;background:white"><em id="m_-4189396021952135319ydpcf278505yui_3_16_0_1_1497025264182_38508"><span id="m_-4189396021952135319ydpcf278505yui_3_16_0_1_1497025264182_38507" style="color:#0000bf;font-size:medium"><span style="background-color:inherit;font-family:'Courier New',courier,monaco,monospace,sans-serif">Diogo Jerônimo</span></span></em></div>
<div style="margin-bottom:0.0001pt;padding:0px;line-height:normal;background:white"><em id="m_-4189396021952135319ydpcf278505yui_3_16_0_1_1497025264182_38430"><span id="m_-4189396021952135319ydpcf278505yui_3_16_0_1_1497025264182_38429" style="color:#0000bf;font-size:medium"><span style="background-color:inherit;font-family:'Courier New',courier,monaco,monospace,sans-serif">Bacharel em Ciências Estatísticas - ENCE/IBGE</span></span></em></div>
<div style="margin-bottom:0.0001pt;padding:0px;line-height:normal;background:white"><em id="m_-4189396021952135319ydpcf278505yui_3_16_0_1_1497025264182_38309"><span id="m_-4189396021952135319ydpcf278505yui_3_16_0_1_1497025264182_38308" style="color:#0000bf;font-size:medium"><span style="background-color:inherit;font-family:'Courier New',courier,monaco,monospace,sans-serif">Mestre em Metrologia - PUC-Rio/PósMQI</span></span></em></div>
<div style="margin-bottom:0.0001pt;padding:0px;line-height:normal;background:white"><em id="m_-4189396021952135319ydpcf278505yui_3_16_0_1_1497025264182_38329"><span id="m_-4189396021952135319ydpcf278505yui_3_16_0_1_1497025264182_38328" style="color:#0000bf;font-size:medium"><span id="m_-4189396021952135319ydpcf278505yui_3_16_0_1_1497025264182_38700" style="background-color:inherit;font-family:'Courier New',courier,monaco,monospace,sans-serif">CONRE: 8514 - SÉRIE A</span></span></em></div>
</div>
</div>
</div>
<div>_______________________________________________<br><br></div>_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank" rel="noreferrer">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" rel="noreferrer noreferrer" 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" rel="noreferrer noreferrer" 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>