Boa tarde a todos!!! Novamente agradecido pela ajuda anterior, e já pedindo 
desculpas por nova perturbação, mas de novo apareceu uma situação que não sei 
resolver. Segue o código R parecido com o outro para baixar dados via URL, onde 
agora x1 representa o código de modulo de um serviço, x2 o ano e x3 o código da 
rodada trimestral de realização desse serviço:baixa_bancos<-function(x1,x2,x3){
dados<-read.csv2(paste('http://.../arquivo_m";, x1 ,"_a",x2,"_s", 
x3,".csv'",sep=""),header=T, sep="|", dec =".", encoding = "UTF-8")} 
A chamada da macro fica algo assim:
a<- vetor de código de módulos; b<-vetor de anos; c<-????
for(i in 1:length(a)); for(j in 1:length(b)); for(k in 1:length(c)){x1<-a[[i]]; 
x2<-b[[j]]; x3<-c[[k]]baixa_bancos(x1,x2,x3)}
Coloquei interrogação no vetor c em vermelho por causa da dúvida. Os códigos de 
módulo e ano (óbvio) são fixos, basta vetorizar. Mas os códigos de realização 
de serviços trimestrais, identificados por código numérico, podem por 
conveniência de atraso, não ser iguais, embora sejam sempre quatro. Assim por 
exemplo:
Mód:108;Ano:2020;codserv:1,2,3,5 Mód:108;Ano:2021;codserv:1,2,3,4 
Mód:429;Ano:2020;codserv:1,2,3,4Mód:429;Ano:2021;codserv:1,3,4,5

Dessa forma o vetor c depende do código de serviço e do ano em que ele foi 
realizado. Para me ajudar nisso, o TI daqui me deu uma outra consulta que 
também baixo por URL, que após alguns ajustes, faço virar uma tabela dentro do 
RStudio, com essa cara: 



Resumindo agora: o que eu queria é adaptar meu código da seguinte forma: se viu 
que o módulo é 108 e o ano é 2020, então ele deve ler como parâmetros para k3 o 
valores 1,2,3,5; se for módulo 108 e ano 2021, ele deve ler para k3 o valores 
1,2,3,4. E assim sucessivamente, até finalizar o baixar das bases de dados 
requeridas.
Eu consegui ser claro? Se sim, alguém saberia como se faz isso?
Obrigado novamente pela disponibilidade do time!!! Att, 
Diogo JerônimoBacharel em Ciências Estatísticas - ENCE/IBGEMestre em Metrologia 
- PUC-Rio/PósMQIhttp://lattes.cnpq.br/8996149312896520


_______________________________________________
R-br mailing list
[email protected]
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.

Responder a