[R-br] Renomear arquivo dentro do R

[Fernando Souza]

putz, esplicar com "s" é foda!!!! Correção explicar. kkkkkk

On Mar 19 2022, at 4:49 pm, Fernando Souza <nandodesouza em gmail.com> wrote:
> Esqueci de esplicar, no código os arquivos serão salvos no diretorio de trabalho informado. O nome dos arquivos é passado por parametros na função baixa_bancos(). No exemplo configurei o nome para ser o mesmo do banco de dados. Para personalizar o banco de dados basta alterar a função baixa_bancos() para:
>
> baixa_bancos<-function(k1,k2, namefile){
> dados<-read.csv(paste0('https://corgis-edu.github.io/corgis/datasets/csv/', k1 ,'/', k2 , ".csv",sep=""),
> header=T, sep=",", dec =".", encoding = "UTF-8")
> write.csv(dados,paste0(namefile,"_",k1,"_s_",k2))
> }
>
> Altere a função paste0() para o formato no nome que desejar
> Espero ter ajudado.
>
> On Mar 19 2022, at 4:38 pm, Fernando Souza <nandodesouza em gmail.com> wrote:
> > Veja se assim te ajuda. Peguei um banco de dados público na rede para usar como exemplo. Neste código o nome dos arquivos terão o mesmo nome do banco de dados.
> >
> > ##Configure o diretorio de trabalho de acordo com o seu sistema windows ou linux
> > setwd("/home/fernando/Downloads/ajuda")
> >
> > ##banco de dados exemplo: https://corgis-edu.github.io/corgis/csv/
> > baixa_bancos<-function(k1,k2, namefile){
> > dados<-read.csv(paste0('https://corgis-edu.github.io/corgis/datasets/csv/', k1 ,'/', k2 , ".csv",sep=""),
> > header=T, sep=",", dec =".", encoding = "UTF-8")
> > write.csv(dados,namefile)
> > }
> >
> > bancoDados <- c("aids","broadway","cars","airlines","business_dynamics")
> > for(i in bancoDados){
> > baixa_bancos(i,i,i)
> >
> >
> > }
> >
> >
> > On Mar 18 2022, at 2:45 pm, Diogo Jerônimo por (R-br) <r-br em listas.c3sl.ufpr.br> wrote:
> > > Prezados boa tarde!!! Lá vou eu incomodar os amigos, rs... Estou fazendo uma macro para baixar dados "*.csv" de uma fonte URL, com um formato semelhante a esse (desculpa, não consegui fazer um reproduzível), onde k1 designa meses do ano e k2 é um conjunto de cinco (ou mais) substâncias:
> > > baixa_bancos<-function(k1,k2){
> > > dados<-read.csv2(paste('http://.../arquivo_m", k1 ,"_s", k2 ,".csv'",sep=""),
> > > header=T, sep="|", dec =".", encoding = "UTF-8")
> > > }
> > >
> > > A chamada da macro fica algo assim:
> > > a<-seq(1:12);b<-seq(1:5)
> > > for(i in 1:length(a))
> > > for(j in 1:length(b))
> > > {
> > > k1<-a[[i]]
> > > k2<-b[[j]]
> > > baixa_bancos(k1,k2)
> > > }
> > >
> > > A dúvida: se eu executar assim a macro, dados vai sempre ser subscrito pelas informações de outro mês e outra substância. Assim, queria que o arquivo (tabela) fosse salvo no ambiente RStudio de forma similar abaixo (obs: sei que não está certo, é mais para entender o que estou precisando):
> > > paste("arquivo_m",k1,"_s",k2)<-dados
> > >
> > >
> > > E em seguida reunir todos eles via rbind ou outro comando. Consegui explicar certo? Se sim, alguém saberia como resolver?
> > >
> > > Obrigado e bom fim-de-semana!!!
> > >
> > > Diogo Jerônimo
> > > Bacharel em Ciências Estatísticas - ENCE/IBGE
> > > Mestre em Metrologia - PUC-Rio/PósMQI
> > > http://lattes.cnpq.br/8996149312896520
> > >
> > >
> > >
> > > _______________________________________________
> > > R-br mailing list
> > > R-br em 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.
> >
>

-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20220319/9e78ef07/attachment.htm>