Para download no R para SER

gistfile1.txt

for (i in numeroEntidade) {
  url <- paste0(Parte1,i,Parte2)
  local2<-paste0(local,i,".xls")
  Sys.sleep(3)
  ##Download the file
  download.file(url, local2, mode="wb")  
  print(i)
}