Este documento presenta un análisis estadístico de la incidencia delictiva en México durante 2024, basado en la base oficial de delitos reportados por mes.
Incluye:
Totales por entidad federativa
Ranking de delitos más frecuentes
Municipios más riesgosos
Análisis específico de homicidio doloso
Gráficas comparativas
# Cargar librerías con base de datos
library(readxl)
library(dplyr)
library(ggplot2)
library(knitr)
library(scales)
df = read_excel("C:\\Users\\César David Bonilla\\Downloads\\2024.xlsx")
head(df) #Observa dimension de la base de datos
## # A tibble: 6 × 21
## Año Clave_Ent Entidad `Cve. Municipio` Municipio Bien jurídico afecta…¹
## <dbl> <dbl> <chr> <dbl> <chr> <chr>
## 1 2024 1 Aguascalien… 1001 Aguascal… La vida y la Integrid…
## 2 2024 1 Aguascalien… 1001 Aguascal… La vida y la Integrid…
## 3 2024 1 Aguascalien… 1001 Aguascal… La vida y la Integrid…
## 4 2024 1 Aguascalien… 1001 Aguascal… La vida y la Integrid…
## 5 2024 1 Aguascalien… 1001 Aguascal… La vida y la Integrid…
## 6 2024 1 Aguascalien… 1001 Aguascal… La vida y la Integrid…
## # ℹ abbreviated name: ¹`Bien jurídico afectado`
## # ℹ 15 more variables: `Tipo de delito` <chr>, `Subtipo de delito` <chr>,
## # Modalidad <chr>, Enero <dbl>, Febrero <dbl>, Marzo <dbl>, Abril <dbl>,
## # Mayo <dbl>, Junio <dbl>, Julio <dbl>, Agosto <dbl>, Septiembre <dbl>,
## # Octubre <dbl>, Noviembre <dbl>, Diciembre <dbl>
En la Tabla 1, observamos que nos muesta la dimensiones de nuestra base de datos.
#Registro total de delitos anual
df <- df %>%
mutate(
total_delitos = Enero + Febrero + Marzo + Abril + Mayo +
Junio + Julio + Agosto + Septiembre +
Octubre + Noviembre + Diciembre
)
#Total de registro por entidad (Estado)
delitos_estado <- df %>%
group_by(Entidad) %>%
summarise(Total_2024 = sum(total_delitos, na.rm = TRUE)) %>%
arrange(desc(Total_2024))
kable(delitos_estado, caption = "Total de delitos por entidad (2024)")
| Entidad | Total_2024 |
|---|---|
| México | 367922 |
| Ciudad de México | 222382 |
| Guanajuato | 154108 |
| Jalisco | 124085 |
| Baja California | 107394 |
| Nuevo León | 90187 |
| Veracruz de Ignacio de la Llave | 81204 |
| Puebla | 80005 |
| Chihuahua | 78774 |
| Coahuila de Zaragoza | 61638 |
| Querétaro | 59409 |
| San Luis Potosí | 58739 |
| Hidalgo | 54529 |
| Quintana Roo | 53628 |
| Michoacán de Ocampo | 48229 |
| Morelos | 46125 |
| Tabasco | 44551 |
| Aguascalientes | 42989 |
| Tamaulipas | 40183 |
| Oaxaca | 37689 |
| Sonora | 36339 |
| Sinaloa | 34489 |
| Zacatecas | 25698 |
| Guerrero | 25644 |
| Colima | 25324 |
| Baja California Sur | 25000 |
| Durango | 19858 |
| Chiapas | 13705 |
| Campeche | 12434 |
| Nayarit | 12254 |
| Yucatán | 4147 |
| Tlaxcala | 3431 |
En la Tabla 2, muestra el total de homicidios cometidos en el año 2024.
#Los estados con mayor incidencia delictiva
top10 <- delitos_estado %>% top_n(10, Total_2024)
ggplot(top10, aes(x = reorder(Entidad, Total_2024), y = Total_2024)) +
geom_col() +
coord_flip() +
labs(title = "Top 10 entidades con mayor incidencia delictiva (2024)",
x = "Entidad", y = "Total de delitos") +
scale_y_continuous(labels = comma)
En la Figura 1, observamos que el estado de Mexico ocupa el primer lugar
de homicidios cometidos.
#Delitos mas frecuentes
delitos_tipo <- df %>%
group_by(`Tipo de delito`) %>%
summarise(total = sum(total_delitos, na.rm = TRUE)) %>%
arrange(desc(total))
kable(delitos_tipo, caption = "Delitos más frecuentes a nivel nacional (2024)")
| Tipo de delito | total |
|---|---|
| Robo | 539248 |
| Violencia familiar | 278289 |
| Lesiones | 220606 |
| Otros delitos del Fuero Común | 198349 |
| Daño a la propiedad | 144066 |
| Amenazas | 138710 |
| Fraude | 113830 |
| Narcomenudeo | 92258 |
| Homicidio | 43116 |
| Abuso sexual | 34576 |
| Abuso de confianza | 30716 |
| Despojo | 28364 |
| Incumplimiento de obligaciones de asistencia familiar | 28148 |
| Otros delitos que atentan contra la libertad personal | 26001 |
| Delitos cometidos por servidores públicos | 18698 |
| Violación simple | 15327 |
| Otros delitos contra el patrimonio | 14355 |
| Falsificación | 14145 |
| Otros delitos que atentan contra la vida y la integridad corporal | 13826 |
| Allanamiento de morada | 13340 |
| Otros delitos que atentan contra la libertad y la seguridad sexual | 12958 |
| Otros delitos contra la familia | 12795 |
| Acoso sexual | 11647 |
| Extorsión | 10227 |
| Violencia de género en todas sus modalidades distinta a la violencia familiar | 6615 |
| Violación equiparada | 6154 |
| Otros delitos contra la sociedad | 5743 |
| Falsedad | 5513 |
| Hostigamiento sexual | 3243 |
| Electorales | 2967 |
| Corrupción de menores | 2822 |
| Contra el medio ambiente | 2534 |
| Feminicidio | 807 |
| Aborto | 794 |
| Trata de personas | 615 |
| Secuestro | 484 |
| Evasión de presos | 100 |
| Rapto | 84 |
| Tráfico de menores | 15 |
| Incesto | 8 |
En la Tabla 3, se ve que el delito mas concurrido es el robo por todos los estados.
#Municipios con mayor incidencia delictiva
peligrosos <- df %>%
group_by(Municipio) %>%
summarise(Total = sum(total_delitos, na.rm = TRUE)) %>%
arrange(desc(Total))
kable(head(peligrosos, 10), caption = "Top 10 municipios más delictivos (2024)")
| Municipio | Total |
|---|---|
| León | 50207 |
| Tijuana | 46708 |
| Benito Juárez | 44071 |
| Juárez | 41825 |
| Ecatepec de Morelos | 37832 |
| Cuauhtémoc | 37542 |
| Querétaro | 35579 |
| Guadalajara | 34712 |
| Mexicali | 34549 |
| Toluca | 33881 |
En la Tabla 4, muestra que el municipio de Leon es quien ocupa el mayor numero de delitos realizados en el año 2024.
#Analisis de homicidio mas dolosos
homicidios <- df %>%
filter(`Subtipo de delito` == "Homicidio doloso") %>%
group_by(Entidad) %>%
summarise(total = sum(total_delitos, na.rm = TRUE)) %>%
arrange(desc(total))
kable(homicidios, caption = "Homicidio doloso por entidad (2024)")
| Entidad | total |
|---|---|
| Guanajuato | 2553 |
| Baja California | 2089 |
| México | 1964 |
| Chihuahua | 1683 |
| Nuevo León | 1539 |
| Jalisco | 1446 |
| Guerrero | 1397 |
| Morelos | 1324 |
| Michoacán de Ocampo | 1246 |
| Sonora | 1129 |
| Puebla | 880 |
| Oaxaca | 877 |
| Ciudad de México | 816 |
| Sinaloa | 805 |
| Veracruz de Ignacio de la Llave | 772 |
| Colima | 750 |
| Tabasco | 707 |
| Chiapas | 662 |
| Quintana Roo | 569 |
| San Luis Potosí | 377 |
| Zacatecas | 369 |
| Tamaulipas | 333 |
| Hidalgo | 246 |
| Querétaro | 174 |
| Nayarit | 144 |
| Tlaxcala | 127 |
| Aguascalientes | 112 |
| Coahuila de Zaragoza | 105 |
| Campeche | 95 |
| Durango | 64 |
| Baja California Sur | 56 |
| Yucatán | 44 |
En la Tabla 5, muestra que el Estado de Guanajuato ocupa el primer lugar de delitos mas dolosos.
Este analisis fue realizado para los gobiernos por los estados, en donde reflejan la mayor cantidad de delitos cometidos, en donde deben tomar cartas en el asunto, haciendo conciencia de lo que se enfrenta la poblacion mexicana el dia a dia, por ello se realizo este analisis basado para gobiernos en todo el pais.