while (ano_mes_corrente <= 201709).
site <- paste("http://www.nuforc.org.webreports/ndxe"), as.character(ano_mes_corrente)
Você está vendo a versão anterior da nova experiência da Alura que estamos preparando para você. Em breve, ela ganha uma identidade visual novinha totalmente pensada em potencializar seus estudos!
Solucionado
while (ano_mes_corrente <= 201709).
site <- paste("http://www.nuforc.org.webreports/ndxe"), as.character(ano_mes_corrente)
essa mensagem ficou duplicada ... arquivando.