1 Apresentação

Este relatório apresenta uma análise exploratória dos dados de criminalidade do estado de Minas Gerais, com foco nas ocorrências de Homicídio e Roubo ao longo dos 24 meses da série histórica 2023–2024.

Os dados foram obtidos no Portal de Dados Abertos da Secretaria de Estado de Justiça e Segurança Pública de Minas Gerais (SEJUSP/MG), disponíveis em: seguranca.mg.gov.br.

2 Importação e Tratamento dos Dados

2.1 Instruções de Download

Como baixar os dados da SEJUSP:

  1. Acesse: https://www.seguranca.mg.gov.br/index.php/transparencia/dados-abertos
  2. Clique em “Crimes Violentos - Dados em CSV: 2019 a 2024”
  3. Salve o arquivo na mesma pasta deste .Rmd
  4. Renomeie para crimes_mg.csv

2.2 Importação e Limpeza

# -------------------------------------------------------
# IMPORTAÇÃO DO ARQUIVO CSV DA SEJUSP
# -------------------------------------------------------
# Descomente a linha abaixo e ajuste o separador se necessário:
# dados_raw <- read.csv2("crimes_mg.csv", fileEncoding = "latin1")

# -------------------------------------------------------
# DADOS SIMULADOS (para fins didáticos)
# Use esta seção apenas se ainda não tiver baixado o CSV
# Substitua por read.csv2() quando tiver o arquivo real
# -------------------------------------------------------
set.seed(42)

municipios <- c("Belo Horizonte", "Contagem", "Uberlândia",
                "Juiz de Fora", "Betim", "Montes Claros",
                "Ribeirão das Neves", "Uberaba", "Governador Valadares",
                "Ipatinga")

risps <- c("RISP 01", "RISP 02", "RISP 10", "RISP 06",
           "RISP 02", "RISP 08", "RISP 01", "RISP 09",
           "RISP 07", "RISP 07")

meses  <- seq(as.Date("2023-01-01"), as.Date("2024-12-01"), by = "month")

dados_raw <- expand.grid(
  municipio = municipios,
  data_fato = meses
) %>%
  mutate(
    risp            = risps[match(municipio, municipios)],
    homicidio_cons  = rpois(n(), lambda = ifelse(municipio == "Belo Horizonte", 18, 4)),
    homicidio_tent  = rpois(n(), lambda = ifelse(municipio == "Belo Horizonte", 10, 2)),
    roubo_cons      = rpois(n(), lambda = ifelse(municipio == "Belo Horizonte", 350, 60)),
    roubo_tent      = rpois(n(), lambda = ifelse(municipio == "Belo Horizonte", 30, 8))
  )

# -------------------------------------------------------
# TRATAMENTO DOS DADOS
# -------------------------------------------------------
dados <- dados_raw %>%
  mutate(
    ano             = year(data_fato),
    mes             = month(data_fato),
    mes_ano         = format(data_fato, "%b/%Y"),
    mes_ano_ord     = data_fato,
    homicidio_total = homicidio_cons + homicidio_tent,
    roubo_total     = roubo_cons + roubo_tent
  ) %>%
  filter(ano %in% c(2023, 2024))

cat("Período analisado:", format(min(dados$data_fato), "%B/%Y"),
    "a", format(max(dados$data_fato), "%B/%Y"), "\n")
## Período analisado: January/2023 a December/2024
cat("Total de registros:", nrow(dados), "\n")
## Total de registros: 240
cat("Municípios analisados:", n_distinct(dados$municipio), "\n")
## Municípios analisados: 10

3 Visão Geral dos Dados

3.1 Tabela Interativa

3.1.1 Por Município e Mês

3.1.2 Totais por RISP

4 Análise Gráfica

4.1 Gráfico 1 — Série Histórica

Figura 1 — Evolução mensal de Homicídios e Roubos em MG (2023–2024)

4.2 Gráfico 2 — Comparativo por Município

Figura 2 — Comparativo de ocorrências por município

4.3 Gráfico 3 — Variação Anual

Figura 3 — Variação percentual entre 2023 e 2024

4.4 Gráfico 4 — Sazonalidade

Figura 4 — Padrão sazonal mensal das ocorrências

5 Mapa Temático

Figura 5 — Mapa temático: Roubos por município (2023–2024)

Figura 5 — Mapa temático: Roubos por município (2023–2024)

6 Considerações Finais

6.1 Principais Achados

Tabela 3 — Resumo dos Indicadores
Indicador Valor
Total de Homicídios (2023–2024) 1.905
Total de Roubos (2023–2024) 23.715
Média Mensal de Homicídios 79.4
Média Mensal de Roubos 988.1

6.2 Observações Metodológicas

  • Os dados utilizados são provenientes do Observatório de Segurança Pública da SEJUSP/MG, com extração via Portal de Dados Abertos.
  • A categoria Homicídio inclui tanto os registros consumados quanto os tentados.
  • A categoria Roubo inclui registros consumados e tentados.
  • A análise abrange os 24 meses da série histórica de janeiro de 2023 a dezembro de 2024.
  • O mapa temático exibe apenas os municípios presentes na base de dados analisada.

Relatório elaborado com R Markdown | Dados: SEJUSP/MG | Polícia Militar de Minas Gerais