[R-br] Renomear arquivo dentro do R

[Fernando Souza]

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/0b47dab9/attachment.htm>