Olá a todos.
Preciso importar um grande número de arquivos xls para o R. Eu criei uma função para automatizar o processo. Vou compartilhar minha solução. Mas acredito que exista algo mais adequado para resolver. Conto com o apoio de vcs.
#Criando uma função para importar vários arquivos xlsx
i=0
datas = seq.Date(from = as_date(“2013-01-01”), as_date(“2019-01-01”), by=“year”)
dt = datas[i+1]
carregarArquivo = function(dt, k){
caminho2 = format(dt, “EstimativaPop/estimativa_%Y_dou.xls” )
lerArquivo = read_excel(caminho2, skip = 2, sheet = 2)
municipios = lerArquivo[c(103,105,117,128,129,135,136),c(k)]
}
Carregando os arquivos
i=0
estAno = carregarArquivo(dt, 5)
for (i in 1:length(datas)) {
dt = datas[i+1]
estAno[i+1] = carregarArquivo(dt, 5)
}