O Instituto de Segurança Pública (ISP) disponibiliza uma série de dados relacionados à violência no Rio de Janeiro. Nesse post, mostro como coletar e visualizar alguns desses dados com o R. A seguir, baixamos os dados mensais referentes à várias métricas de violência no Estado.
#####################################################
##### Segurança Pública no Rio de Janeiro ###########
#####################################################
library(readr)
library(lubridate)
library(magrittr)
library(dplyr)
library(ggplot2)
library(scales)
library(BMR)
url = 'http://www.ispdados.rj.gov.br/Arquivos/DOMensalEstadoDesde1991.csv'
download.file(url, destfile='basededados.csv', mode='wb')
data = read_csv2('basededados.csv') %>%
mutate(date = make_datetime(vano, mes))
Uma vez que baixamos e lemos os dados do ISP, nós também criamos um vetor de datas a partir do próprio dataset. A seguir, visualizamos alguns dados referentes a homicídios e outros crimes relacionados.
A seguir, visualizamos crimes associados a roubos.
Por fim, visualizamos os homicídios associados a intervenções policiais.
Como mostra o bloxplot abaixo, os dados de homicídios por intervenção policial na ponta estão bem acima da mediana histórica. É realmente um número preocupante.
____________________________
Aprenda a fazer isso e muito mais com o R com o nosso Curso de Introdução ao R para Análise de Dados.
