Vamos usar o pacote rChart de Ramnath Vaidyanathan para montar um gráfico animado da pirâmide etária no Brasil desde 1970 até o ano 2050. É necessário ter os pacotes devtools, reshape2, plyr e XML instalados. Se não, execute esta linha de comando

install.packages(c('XML', 'reshape2', 'devtools', 'plyr'))

Depois disso, carregue o pacote devtools para que façamos a instalação do pacote.

library(devtools)
install_github('ramnathv/rCharts@dev')

Agora, vamos carregar algumas funções para raspagem e plotagem desses dados escritas por Kyle Walker. Se você estiver usando o RStudio (altamente recomendável), use este comando:

source('https://raw.githubusercontent.com/walkerke/teaching-with-datavis/master/pyramids/rcharts_pyramids.R')

Para um tutorial completo do uso do pacote, acesse este post. Por ora, vamos focar apenas em nosso objetivo: plotar a transição demográfica no Brasil. Vamos plotar as pirâmides etárias do Brasil do ano 1970 até 2050 com intervalos de 5 anos. Veja como a população brasileira se comporta no período.

Transição Demográfica no Brasil

dPyramid('BR', seq(1970, 2050, 5), colors = c('blue', 'red'))