O professor da FURG, Cristiano Oliveira, gentilmente, me enviou os dados do exercício que ele fez envolvendo focos de queimadas no Brasil. Hoje, infelizmente, tenho algumas entregas para fazer e não vou ter tempo de olhar bem os dados. Ao longo da semana, pretendo construir algo mais elaborado com eles. Por enquanto, fiquem com o gráfico sazonal dos focos de queimadas...
library(readxl)
data = read_excel('focos.xlsx')
queimadas = ts(data$Focos, start=c(2003,01), freq=12)
ggmonthplot(queimadas/1000)+
geom_line(colour='red')+
labs(x='', y='Mil',
title='Sazonalidade dos Focos de Queimadas ativos no Brasil',
caption='Fonte: http://queimadas.dgi.inpe.br/queimadas/portal')
Para quem quiser reproduzir o gráfico, o arquivo focos.xlsx está aqui.
_________________________________
OBS: O Shikida também brincou com os dados aqui.
