INTRODUÇÃO

A criminalidade é uma preocupação para a segurança pública e o bem-estar social em grandes cidades ao redor do mundo. Chicago, uma das maiores metrópoles dos Estados Unidos, tem enfrentado desafios significativos relacionados à criminalidade ao longo das últimas duas décadas. A análise da taxa de crimes em Chicago de 2001 a 2023 é crucial para entender os padrões e as tendências desses crimes, identificar áreas problemáticas e desenvolver estratégias eficazes de prevenção e controle. Este projeto se propõe a examinar detalhadamente os dados dos crimes relatados nesse período, já que os EUA é considerado um país de primeiro mundo e tão cobiçado aos brasileiros quando se trata de viagens/turismo.

Para abordar a declaração do problema sobre a análise da taxa de crimes em Chicago de 2001 a 2023, utilizarei um conjunto de dados abrangente fornecido pelo Departamento de Polícia de Chicago. Este conjunto de dados inclui informações detalhadas sobre incidentes criminais relatados na cidade durante o período especificado.

Dados Utilizados:

A metodologia utilizada é baseada em algumas etapas, começando pela coleta dos dados, tratamento e limpeza dos dados e por fim análises exploratória dos dados. Os dados são coletados no site acima, em formato .csv, e importados para o Rmarkdown.Os dados possuem aproximadamente 200.000 KB e podem ser baixados pelo site do Kaggle citado acima. Após a importação dos dados, é possível realizar os tratamentos, retirando simbolos especiais, verificar as celulas em branco e arrumar as colunas. Por fim, realizar uma análise dos dados e plotar alguns gráficos para mostrar os cenários de crimes em Chicago.

As análises realizadas podem ajudar a polícia de Chicago e os seus governandes a determinar se o estado está agiando de maneira eficiente, se há um crescimento nos crimes nos últimos anos e tomar decisões que trazem benefícios à população. A pesquisa também servirá para possíveis turistas que desejam viajar para Chicago, que é a terceira maior cidade do EUA, bem como pessoas que desejam se mudar para Chicago e buscam saber como andar os índices de criminalidade.

PACOTES REQUERIDOS

Todos os Pacotes listados abaixo são necessários para realização do projeto, sem eles não é possível realizar o desenvolvimento:

Pacotes Utilização
library(dplyr) Para manipulação avançada dos DataFrames
library(readr) Pacote utilizado para habilitar funções para leitura dos dados
library(lubridate) Manipulação de datas e tempos
library(ggplot2) Visualização de dados

PREPARAÇÃO DOS DADOS

A base de dados foi obtida do Kaggle, especificamente do conjunto de dados “Chicago Total Crimes 2001-2023”, por meio de https://www.kaggle.com/datasets/liamarguedas/chicago-total-crimes-2001-2023. O conjunto de dados foi coletado para registrar todos os crimes relatados à polícia de Chicago, permitindo análises de padrões de crime, frequência, e distribuição ao longo do tempo. As coletas foram realizadas dos anos 2001 a 2023.

O conjunto original apresenta diversas variáveis, como:

  • Case Number: Número do caso.
  • Date: Data e hora do crime.
  • Block: Endereço do crime.
  • IUCR: Código de classificação do crime.
  • Primary Type: Tipo principal do crime.
  • Description: Descrição do crime.
  • Location Description: Descrição da localização.
  • Arrest: Indicador se houve prisão .
  • Domestic: Indicador se foi um crime doméstico .
  • Beat: Código da batida policial.
  • District: Distrito policial.
  • Ward: Distrito municipal.
  • Community Area: Área comunitária.
  • FBI Code: Código FBI do crime.
  • X Coordinate e Y Coordinate: Coordenadas de localização.
  • Updated On: Data de atualização do registro.
  • Latitude e Longitude: Coordenadas geográficas.
  • Location: Localização completa.

Entre 2001 e 2023 tiveram em torno de 7 milhões de casos, logo fica enviável realizar essa análise no R devido ao uso computacional, com isso na análise foi levada em conta os anos 2020 a 2023. Para filtrar esses anos foi necessário utilizar a ferramento Power Query Excel, sendo útil em dividir a coluna Date, que possuia junto data, hora e AM/PM, em 3 novas colunas: Date para Date, Time e AM/PM. No fim dessa preparação dos dados, a base de dados de resume a 807 mil linhas, agora sendo possível utilizar no Rstudio para uma análise mais rápida e possível.

Leitura dos Dados

É possível carregar os dados da maneira que sai do Excel e que chegam no Rstudio, por meio de:

crimes_data <- read.csv("C:\\Users\\Guilherme Henrique\\Desktop\\Faculdade\\Mestrado\\2024.1\\CAD_24.1\\2 VA\\Projeto 2VA\\dados.csv", sep = ";")

Visualização dos dados Carregados

A base possui 21 colunas e 807.112 linhas. As colunas já foram citadas na parte inicial da preparação de dados e é possível visualizar os dados conforme a tabela abaixo:

knitr::kable(head(crimes_data, 100))
Case.Number Date Time AM.PM Block IUCR Primary.Type Description Location.Description Arrest Domestic Beat District Ward Community.Area FBI.Code X.Coordinate Y.Coordinate Latitude Longitude Location
JD193500 03/18/2020 11:15:00 PM 009XX W MONTANA ST 1320 CRIMINAL DAMAGE TO VEHICLE RESIDENCE FALSO FALSO 1932 19 43 7 14 -2147483648 -2147483648 NA NA
JE202728 04/16/2021 08:45:00 PM 056XX N RIDGE AVE 820 THEFT $500 AND UNDER OTHER (SPECIFY) FALSO FALSO 2013 20 48 77 6 -2147483648 -2147483648 NA NA
JD458715 12/11/2020 06:00:00 PM 019XX N LAWNDALE AVE 810 THEFT OVER $500 RESIDENCE - GARAGE FALSO FALSO 2535 25 26 22 6 -2147483648 -2147483648 NA NA
JD461361 12/08/2020 01:16:00 PM 041XX N BERNARD ST 820 THEFT $500 AND UNDER RESIDENCE - PORCH / HALLWAY FALSO FALSO 1723 17 35 16 6 -2147483648 -2147483648 NA NA
JD456506 12/11/2020 06:45:00 PM 010XX W MADISON ST 910 MOTOR VEHICLE THEFT AUTOMOBILE STREET FALSO FALSO 1232 12 25 28 7 1169700 1900215 41881693864 -87652323905 (41.881693864, -87.652323905)
JE276700 06/23/2021 11:39:00 AM 007XX N KEDZIE AVE 2024 NARCOTICS POSSESS - HEROIN (WHITE) SIDEWALK VERDADEIRO FALSO 1121 11 27 23 18 -2147483648 -2147483648 NA NA
JE252347 06/02/2021 11:30:00 AM 004XX W 27TH ST 2018 NARCOTICS MANUFACTURE / DELIVER - SYNTHETIC DRUGS STREET VERDADEIRO FALSO 914 9 11 60 18 -2147483648 -2147483648 NA NA
JD461506 12/03/2020 12:38:00 PM 065XX N WHIPPLE ST 820 THEFT $500 AND UNDER RESIDENCE FALSO FALSO 2412 24 50 2 6 -2147483648 -2147483648 NA NA
JD194176 03/18/2020 11:30:00 AM 020XX S MICHIGAN AVE 820 THEFT $500 AND UNDER APARTMENT FALSO FALSO 131 1 3 33 6 -2147483648 -2147483648 NA NA
JE332953 08/10/2021 04:20:00 PM 016XX W VAN BUREN ST 2018 NARCOTICS MANUFACTURE / DELIVER - SYNTHETIC DRUGS VEHICLE NON-COMMERCIAL VERDADEIRO FALSO 1231 12 27 28 18 -2147483648 -2147483648 NA NA
JD189865 03/18/2020 07:20:00 PM 106XX S GREEN ST 1153 DECEPTIVE PRACTICE FINANCIAL IDENTITY THEFT OVER $ 300 RESIDENCE FALSO FALSO 2233 22 34 73 11 1172534 1834306 41700770216 -87643858519 (41.700770216, -87.643858519)
JD329584 08/09/2020 06:01:00 PM 042XX N HERMITAGE AVE 810 THEFT OVER $500 RESIDENCE - YARD (FRONT / BACK) FALSO FALSO 1912 19 47 6 6 -2147483648 -2147483648 NA NA
JD189881 03/18/2020 07:03:00 PM 004XX W 71ST ST 143A WEAPONS VIOLATION UNLAWFUL POSSESSION - HANDGUN STREET VERDADEIRO FALSO 732 7 6 68 15 1174266 1857844 41765323402 -87636819109 (41.765323402, -87.636819109)
JD189665 03/18/2020 04:15:00 PM 057XX S ALBANY AVE 4651 OTHER OFFENSE SEX OFFENDER - FAIL TO REGISTER NEW ADDRESS RESIDENCE FALSO FALSO 824 8 14 63 26 1156693 1866467 41789358619 -87700997541 (41.789358619, -87.700997541)
JD189720 03/18/2020 04:45:00 PM 014XX S CENTRAL PARK AVE 486 BATTERY DOMESTIC BATTERY SIMPLE RESIDENCE FALSO VERDADEIRO 1011 10 24 29 08B 1152607 1892849 41861835803 -87715283861 (41.861835803, -87.715283861)
JD189272 03/18/2020 07:00:00 AM 072XX S MARSHFIELD AVE 497 BATTERY AGGRAVATED DOMESTIC BATTERY - OTHER DANGEROUS WEAPON RESIDENCE FALSO VERDADEIRO 735 7 17 67 04B 1166597 1856663 41762249552 -87664962008 (41.762249552, -87.664962008)
JD190363 03/18/2020 06:00:00 PM 056XX S RACINE AVE 1310 CRIMINAL DAMAGE TO PROPERTY ABANDONED BUILDING FALSO FALSO 712 7 16 68 14 1169282 1867411 41791685711 -87654810301 (41.791685711, -87.654810301)
JD189649 03/18/2020 03:54:00 PM 011XX S RICHMOND ST 460 BATTERY SIMPLE APARTMENT FALSO FALSO 1135 11 28 29 08B 1156864 1894979 41867595589 -8769959933 (41.867595589, -87.69959933)
JD329629 08/09/2020 11:00:00 PM 001XX W WASHINGTON ST 610 BURGLARY FORCIBLE ENTRY OTHER (SPECIFY) FALSO FALSO 122 1 42 32 5 1174897 1900809 41883209085 -87633223046 (41.883209085, -87.633223046)
JG321093 06/29/2023 04:08:00 PM 010XX N CHRISTIANA AVE 1320 CRIMINAL DAMAGE TO VEHICLE STREET FALSO FALSO 1121 11 26 23 14 1153797 1906894 41900353139 -87710541402 (41.900353139, -87.710541402)
JD190205 03/19/2020 09:08:00 AM 042XX S INDIANA AVE 1310 CRIMINAL DAMAGE TO PROPERTY APARTMENT FALSO FALSO 213 2 3 38 14 1178304 1876982 41817749235 -87621437827 (41.817749235, -87.621437827)
JE327386 08/05/2021 01:00:00 PM 045XX S SAWYER AVE 620 BURGLARY UNLAWFUL ENTRY RESIDENCE FALSO FALSO 821 8 14 58 5 1155459 1874401 41811155434 -87705309714 (41.811155434, -87.705309714)
JD326107 08/09/2020 12:30:00 PM 031XX W ROOSEVELT RD 1320 CRIMINAL DAMAGE TO VEHICLE STREET FALSO FALSO 1134 11 24 29 14 1155802 1894546 41866428839 -87703509785 (41.866428839, -87.703509785)
JD191260 03/19/2020 03:43:00 PM 036XX W OAKDALE AVE 820 THEFT $500 AND UNDER RESIDENCE - PORCH / HALLWAY FALSO FALSO 2523 25 30 21 6 -2147483648 -2147483648 NA NA
JE202919 04/16/2021 09:00:00 PM 007XX S CLARK ST 560 ASSAULT SIMPLE RESIDENCE - PORCH / HALLWAY FALSO FALSO 123 1 4 32 08A 1175633 1897092 41872992906 -8763063219 (41.872992906, -87.63063219)
JD328718 08/09/2020 12:00:00 AM 013XX N Wolcott Ave 820 THEFT $500 AND UNDER APARTMENT FALSO FALSO 1424 14 1 24 6 -2147483648 -2147483648 NA NA
JD194649 03/12/2020 11:59:00 AM 039XX N SOUTHPORT AVE 820 THEFT $500 AND UNDER APARTMENT FALSO FALSO 1922 19 47 6 6 -2147483648 -2147483648 NA NA
JD191217 03/19/2020 03:00:00 PM 063XX S LAVERGNE AVE 820 THEFT $500 AND UNDER RESIDENCE FALSO FALSO 813 8 13 64 6 -2147483648 -2147483648 NA NA
JD194488 03/16/2020 05:00:00 PM 012XX W GRANVILLE AVE 890 THEFT FROM BUILDING RESIDENCE - PORCH / HALLWAY FALSO FALSO 2433 24 48 77 6 -2147483648 -2147483648 NA NA
JD190184 03/19/2020 04:00:00 AM 073XX N HARLEM AVE 2820 OTHER OFFENSE TELEPHONE THREAT APARTMENT FALSO VERDADEIRO 1611 16 41 9 08A 1127389 1948225 42014255166 -87806607683 (42.014255166, -87.806607683)
JF407076 09/22/2022 11:00:00 PM 010XX W RANDOLPH ST 810 THEFT OVER $500 STREET FALSO FALSO 1224 12 27 28 6 1169327 1901202 41884410376 -87653664839 (41.884410376, -87.653664839)
JD461729 06/01/2020 07:00:00 AM 034XX W 116TH ST 1154 DECEPTIVE PRACTICE FINANCIAL IDENTITY THEFT $300 AND UNDER FALSO FALSO 2211 22 19 74 11 -2147483648 -2147483648 NA NA
JD325954 08/09/2020 09:58:00 AM 082XX S STATE ST 1310 CRIMINAL DAMAGE TO PROPERTY GAS STATION FALSO FALSO 631 6 6 44 14 1177732 1850157 41744151668 -8762434741 (41.744151668, -87.62434741)
JE445271 11/14/2021 05:00:00 PM 028XX S PULASKI RD 1320 CRIMINAL DAMAGE TO VEHICLE STREET FALSO FALSO 1031 10 22 30 14 1150172 1884823 41839859214 -87724431324 (41.839859214, -87.724431324)
JD461498 12/02/2020 02:23:00 PM 015XX W GARFIELD BLVD 820 THEFT $500 AND UNDER APARTMENT FALSO FALSO 934 9 16 61 6 -2147483648 -2147483648 NA NA
JD461358 12/10/2020 08:00:00 PM 019XX S Michigan Ave 1310 CRIMINAL DAMAGE TO PROPERTY CHURCH / SYNAGOGUE / PLACE OF WORSHIP FALSO FALSO 131 1 3 33 14 -2147483648 -2147483648 NA NA
JF259485 05/29/2022 12:00:00 AM 014XX S MUSEUM CAMPUS DR 870 THEFT POCKET-PICKING SPORTS ARENA / STADIUM FALSO FALSO 132 1 4 33 6 -2147483648 -2147483648 NA NA
JD456251 12/11/2020 12:54:00 PM 011XX N HOYNE AVE 1154 DECEPTIVE PRACTICE FINANCIAL IDENTITY THEFT $300 AND UNDER APARTMENT FALSO FALSO 1212 12 32 24 11 1162192 1907753 41902538926 -8767968215 (41.902538926, -87.67968215)
JD191086 03/20/2020 10:30:00 AM 075XX S STONY ISLAND AVE 460 BATTERY SIMPLE HOSPITAL BUILDING / GROUNDS FALSO FALSO 411 4 8 43 08B 1188234 1855158 41757630995 -87585708249 (41.757630995, -87.585708249)
JD456245 12/11/2020 02:57:00 PM 054XX W CONGRESS PKWY 4387 OTHER OFFENSE VIOLATE ORDER OF PROTECTION RESIDENCE FALSO VERDADEIRO 1522 15 29 25 26 1140327 1897153 41873880295 -87760256803 (41.873880295, -87.760256803)
JD456096 12/11/2020 12:30:00 PM 081XX S CAMPBELL AVE 486 BATTERY DOMESTIC BATTERY SIMPLE RESIDENCE FALSO VERDADEIRO 835 8 18 70 08B 1161108 1850689 41745971272 -87685244965 (41.745971272, -87.685244965)
JD194045 03/16/2020 08:00:00 PM 031XX W MARQUETTE RD 2820 OTHER OFFENSE TELEPHONE THREAT APARTMENT FALSO VERDADEIRO 831 8 17 66 08A 1156439 1860025 41771685949 -87702102281 (41.771685949, -87.702102281)
JE206873 02/20/2021 01:10:00 PM 0000X N STATE ST 860 THEFT RETAIL THEFT SMALL RETAIL STORE FALSO FALSO 112 1 42 32 6 -2147483648 -2147483648 NA NA
JD195603 02/06/2020 05:25:00 PM 062XX N ROCKWELL ST 820 THEFT $500 AND UNDER APARTMENT FALSO FALSO 2413 24 50 2 6 -2147483648 -2147483648 NA NA
JE205409 04/16/2021 09:05:00 AM 021XX W BERTEAU AVE 1154 DECEPTIVE PRACTICE FINANCIAL IDENTITY THEFT $300 AND UNDER FALSO FALSO 1911 19 47 5 11 -2147483648 -2147483648 NA NA
JE206664 09/25/2020 12:00:00 AM 0000X W 125TH ST 1153 DECEPTIVE PRACTICE FINANCIAL IDENTITY THEFT OVER $ 300 RESIDENCE FALSO FALSO 523 5 9 53 11 -2147483648 -2147483648 NA NA
JD191609 03/20/2020 08:40:00 PM 004XX W 103RD ST 2093 NARCOTICS FOUND SUSPECT NARCOTICS VEHICLE NON-COMMERCIAL VERDADEIRO FALSO 2232 22 34 49 18 1175106 1836607 41707027606 -87634372432 (41.707027606, -87.634372432)
JE205512 04/16/2021 02:35:00 AM 067XX N NEWGARD AVE 820 THEFT $500 AND UNDER RESIDENCE - YARD (FRONT / BACK) FALSO FALSO 2432 24 49 1 6 -2147483648 -2147483648 NA NA
JE206874 04/12/2021 09:04:00 AM 0000X N STATE ST 860 THEFT RETAIL THEFT SMALL RETAIL STORE FALSO FALSO 112 1 42 32 6 -2147483648 -2147483648 NA NA
JE203657 04/16/2021 10:00:00 PM 037XX W POLK ST 820 THEFT $500 AND UNDER STREET FALSO FALSO 1133 11 24 27 6 1151665 1896118 41870824869 -87718655889 (41.870824869, -87.718655889)
JE205431 04/12/2021 05:00:00 PM 015XX W GRAND AVE 1156 DECEPTIVE PRACTICE ATTEMPT - FINANCIAL IDENTITY THEFT RESIDENCE FALSO FALSO 1215 12 1 24 11 1165934 1903575 41890995133 -87666056556 (41.890995133, -87.666056556)
JF413864 03/01/2020 12:00:00 AM 069XX S CALUMET AVE 1153 DECEPTIVE PRACTICE FINANCIAL IDENTITY THEFT OVER $ 300 RESIDENCE FALSO FALSO 322 3 6 69 11 -2147483648 -2147483648 NA NA
JE202720 04/16/2021 06:00:00 PM 006XX W MADISON ST 820 THEFT $500 AND UNDER APARTMENT FALSO FALSO 121 1 42 28 6 -2147483648 -2147483648 NA NA
JD191015 03/20/2020 08:30:00 AM 022XX E 69TH ST 486 BATTERY DOMESTIC BATTERY SIMPLE APARTMENT FALSO FALSO 331 3 5 43 08B 1192217 1859649 41769858738 -87570965451 (41.769858738, -87.570965451)
JE205551 04/15/2021 12:00:00 AM 063XX N LAKEWOOD AVE 820 THEFT $500 AND UNDER STREET FALSO FALSO 2433 24 48 77 6 1166468 1942205 41996986268 -87662985961 (41.996986268, -87.662985961)
JE205682 08/28/2020 02:00:00 PM 006XX W 115TH ST 486 BATTERY DOMESTIC BATTERY SIMPLE RESIDENCE FALSO VERDADEIRO 2233 22 34 49 08B -2147483648 -2147483648 NA NA
JE200900 04/16/2021 07:25:00 AM 082XX S MARSHFIELD AVE 1320 CRIMINAL DAMAGE TO VEHICLE APARTMENT FALSO FALSO 614 6 21 71 14 -2147483648 -2147483648 NA NA
JE333631 08/05/2021 04:30:00 AM 062XX W EDDY ST 810 THEFT OVER $500 VEHICLE NON-COMMERCIAL FALSO FALSO 1633 16 36 17 6 -2147483648 -2147483648 NA NA
JD416883 10/31/2020 05:33:00 PM 019XX N LA CROSSE AVE 495 BATTERY AGGRAVATED OF A SENIOR CITIZEN RESIDENCE VERDADEIRO FALSO 2533 25 36 19 04B 1143745 1912640 41916315095 -87747319 (41.916315095, -87.747319)
JF408212 09/23/2022 07:45:00 PM 001XX W HURON ST 486 BATTERY DOMESTIC BATTERY SIMPLE SIDEWALK FALSO VERDADEIRO 1832 18 2 8 08B 1175253 1905045 41894824927 -87631788635 (41.894824927, -87.631788635)
JD329925 08/10/2020 03:40:00 PM 007XX W 59TH ST 1153 DECEPTIVE PRACTICE FINANCIAL IDENTITY THEFT OVER $ 300 FALSO FALSO 711 7 20 68 11 -2147483648 -2147483648 NA NA
JD328242 08/10/2020 05:00:00 PM 019XX N DRAKE AVE 820 THEFT $500 AND UNDER RESIDENCE FALSO FALSO 1422 14 26 22 6 -2147483648 -2147483648 NA NA
JE327597 08/05/2021 05:30:00 PM 016XX E 74TH PL 620 BURGLARY UNLAWFUL ENTRY APARTMENT FALSO FALSO 324 3 8 43 5 1188511 1855912 41759693428 -87584669047 (41.759693428, -87.584669047)
JG335489 07/09/2023 12:30:00 AM 007XX N DAMEN AVE 890 THEFT FROM BUILDING BAR OR TAVERN FALSO FALSO 1221 12 36 24 6 -2147483648 -2147483648 NA NA
JE207145 12/24/2020 03:00:00 PM 002XX W 37TH ST 1751 OFFENSE INVOLVING CHILDREN CRIMINAL SEXUAL ABUSE BY FAMILY MEMBER APARTMENT FALSO VERDADEIRO 915 9 3 34 17 -2147483648 -2147483648 NA NA
JG325452 06/29/2023 08:00:00 PM 032XX N Clark ST 1150 DECEPTIVE PRACTICE CREDIT CARD FRAUD OTHER (SPECIFY) FALSO FALSO 1924 19 44 6 11 -2147483648 -2147483648 NA NA
JD327087 08/10/2020 11:00:00 AM 015XX S HAMLIN AVE 486 BATTERY DOMESTIC BATTERY SIMPLE SIDEWALK FALSO VERDADEIRO 1014 10 24 29 08B 1151295 1892195 41860066967 -87720117178 (41.860066967, -87.720117178)
JG329085 04/25/2023 11:43:00 AM 040XX S ALBANY AVE 820 THEFT $500 AND UNDER RESIDENCE FALSO FALSO 921 9 12 58 6 1156351 1877492 41819619605 -87701954595 (41.819619605, -87.701954595)
JE206585 09/23/2020 09:00:00 AM 037XX N HALSTED ST 1153 DECEPTIVE PRACTICE FINANCIAL IDENTITY THEFT OVER $ 300 APARTMENT FALSO FALSO 1923 19 46 6 11 -2147483648 -2147483648 NA NA
JD190926 03/20/2020 03:30:00 AM 062XX S DR MARTIN LUTHER KING JR DR 1310 CRIMINAL DAMAGE TO PROPERTY RESIDENCE FALSO FALSO 313 3 20 42 14 1179993 1863678 41781203314 -87615649592 (41.781203314, -87.615649592)
JD192042 03/20/2020 09:00:00 PM 017XX E 83RD ST 460 BATTERY SIMPLE RESIDENCE - YARD (FRONT / BACK) FALSO VERDADEIRO 412 4 8 45 08B 1189161 1850288 41744245112 -87582466725 (41.744245112, -87.582466725)
JG329883 06/29/2023 04:00:00 AM 016XX N LOCKWOOD AVE 2820 OTHER OFFENSE TELEPHONE THREAT APARTMENT FALSO VERDADEIRO 2532 25 37 25 08A 1140812 1910557 419106536 -87758146182 (41.9106536, -87.758146182)
JD249122 05/31/2020 02:27:00 PM 062XX S KEDZIE AVE 610 BURGLARY FORCIBLE ENTRY DEPARTMENT STORE FALSO FALSO 823 8 14 66 5 1156132 1862862 41779477279 -87703151446 (41.779477279, -87.703151446)
JF122951 01/24/2022 05:30:00 PM 018XX W GRAND AVE 910 MOTOR VEHICLE THEFT AUTOMOBILE STREET FALSO FALSO 1221 12 36 24 7 1164069 1903522 41890889291 -87672907259 (41.890889291, -87.672907259)
JD192549 03/21/2020 04:28:00 PM 047XX W ADDISON ST 1130 DECEPTIVE PRACTICE FRAUD OR CONFIDENCE GAME RESIDENCE FALSO FALSO 1731 17 30 15 11 1144251 1923517 4194615313 -87745185825 (41.94615313, -87.745185825)
JF328862 07/23/2022 04:00:00 PM 069XX W 64TH PL 486 BATTERY DOMESTIC BATTERY SIMPLE RESIDENCE VERDADEIRO VERDADEIRO 812 8 13 64 08B 1131307 1860969 41774745709 -87794208216 (41.774745709, -87.794208216)
JF335627 07/29/2022 03:09:00 AM 052XX N NAGLE AVE 550 ASSAULT AGGRAVATED POLICE OFFICER - HANDGUN STREET FALSO FALSO 1613 16 41 10 04A 1132572 1934567 41976687342 -87787856137 (41.976687342, -87.787856137)
JF439075 10/18/2022 12:00:00 AM 005XX S CENTRAL AVE 1582 OFFENSE INVOLVING CHILDREN CHILD PORNOGRAPHY SIDEWALK FALSO FALSO 1522 15 29 25 17 1139141 1897035 41873578134 -87764614167 (41.873578134, -87.764614167)
JF467255 11/07/2022 12:00:00 AM 065XX S MOZART ST 1750 OFFENSE INVOLVING CHILDREN CHILD ABUSE RESIDENCE FALSO FALSO 831 8 15 66 08B 1158504 1861158 41774753227 -87694501757 (41.774753227, -87.694501757)
JF484488 11/22/2022 10:01:00 PM 0000X W 114TH PL 143A WEAPONS VIOLATION UNLAWFUL POSSESSION - HANDGUN RESIDENCE VERDADEIRO FALSO 522 5 9 49 15 1177990 1829046 41686214418 -87624039314 (41.686214418, -87.624039314)
JF367998 08/23/2022 10:29:00 PM 055XX S PRAIRIE AVE 041A BATTERY AGGRAVATED - HANDGUN APARTMENT FALSO VERDADEIRO 231 2 20 40 04B 1178988 1868183 41793588428 -87619196923 (41.793588428, -87.619196923)
JF517984 12/20/2022 08:45:00 PM 083XX S OGLESBY AVE 325 ROBBERY VEHICULAR HIJACKING VEHICLE NON-COMMERCIAL FALSO FALSO 412 4 7 46 3 1193289 1850362 41744348335 -87567339144 (41.744348335, -87.567339144)
JD191822 03/21/2020 07:00:00 AM 036XX S MICHIGAN AVE 460 BATTERY SIMPLE APARTMENT FALSO FALSO 212 2 3 35 08B 1177787 1881111 41829091287 -87623209136 (41.829091287, -87.623209136)
JD191757 03/21/2020 01:30:00 AM 011XX S RICHMOND ST 1310 CRIMINAL DAMAGE TO PROPERTY SIDEWALK FALSO VERDADEIRO 1135 11 28 29 14 1156864 1894979 41867595589 -8769959933 (41.867595589, -87.69959933)
JD327221 08/10/2020 01:00:00 PM 019XX W FARGO AVE 910 MOTOR VEHICLE THEFT AUTOMOBILE STREET FALSO FALSO 2424 24 49 1 7 1161876 1949332 42016640344 -87679677859 (42.016640344, -87.679677859)
JD327028 08/10/2020 01:00:00 AM 008XX E 46TH ST 2826 OTHER OFFENSE HARASSMENT BY ELECTRONIC MEANS APARTMENT FALSO FALSO 221 2 4 39 26 1182577 1874691 41811364344 -87605834495 (41.811364344, -87.605834495)
JD328722 08/10/2020 02:00:00 AM 0000X W HURON ST 610 BURGLARY FORCIBLE ENTRY OTHER (SPECIFY) FALSO FALSO 1832 18 2 8 5 1175614 1905055 4189484426 -87630462495 (41.89484426, -87.630462495)
JD196925 03/13/2020 01:47:00 PM 028XX W LOGAN BLVD 820 THEFT $500 AND UNDER APARTMENT FALSO FALSO 1411 14 32 22 6 -2147483648 -2147483648 NA NA
JD192764 03/22/2020 10:00:00 AM 005XX W 45TH PL 910 MOTOR VEHICLE THEFT AUTOMOBILE STREET FALSO FALSO 925 9 11 61 7 1173554 1874750 41811731082 -87638928321 (41.811731082, -87.638928321)
JG328444 05/25/2022 12:00:00 AM 066XX N ASHLAND AVE 1153 DECEPTIVE PRACTICE FINANCIAL IDENTITY THEFT OVER $ 300 APARTMENT FALSO FALSO 2432 24 49 1 11 -2147483648 -2147483648 NA NA
JG338154 04/01/2022 02:00:00 PM 032XX N CAMPBELL AVE 810 THEFT OVER $500 POLICE FACILITY / VEHICLE PARKING LOT FALSO FALSO 1921 19 47 5 6 -2147483648 -2147483648 NA NA
JG326902 06/27/2023 04:30:00 PM 065XX N NEWGARD AVE 810 THEFT OVER $500 STREET FALSO FALSO 2432 24 49 1 6 1165416 1943519 42000614448 -87666818201 (42.000614448, -87.666818201)
JG342405 07/03/2023 12:01:00 AM 072XX S LUELLA AVE 1150 DECEPTIVE PRACTICE CREDIT CARD FRAUD RESIDENCE FALSO FALSO 333 3 5 43 11 1192470 1857394 41763664689 -87570111425 (41.763664689, -87.570111425)
JG320179 06/28/2023 11:04:00 PM 036XX N KEDZIE AVE 110 HOMICIDE FIRST DEGREE MURDER ALLEY VERDADEIRO FALSO 1733 17 33 16 01A 1154405 1924119 41947607802 -87707846683 (41.947607802, -87.707846683)
JD192888 03/22/2020 06:24:00 PM 039XX S LA SALLE ST 470 PUBLIC PEACE VIOLATION RECKLESS CONDUCT STREET VERDADEIRO FALSO 213 2 3 37 24 1176051 1879069 41823527068 -87629639751 (41.823527068, -87.629639751)
JG321314 06/29/2023 07:40:00 PM 066XX S STEWART AVE 110 HOMICIDE FIRST DEGREE MURDER STREET FALSO FALSO 722 7 6 68 01A 1174775 1860707 41773168477 -87634868256 (41.773168477, -87.634868256)
JD115727 01/14/2020 05:45:00 PM 115XX S WENTWORTH AVE 320 ROBBERY STRONG ARM - NO WEAPON ALLEY FALSO VERDADEIRO 522 5 9 53 3 1177004 1828423 41684527033 -87627667538 (41.684527033, -87.627667538)
JD398656 10/13/2020 08:00:00 PM 007XX E 82ND ST 330 ROBBERY AGGRAVATED STREET FALSO FALSO 631 6 6 44 3 1182901 1850799 41745794957 -87605387935 (41.745794957, -87.605387935)
JD398836 10/14/2020 06:00:00 AM 081XX S MAY ST 313 ROBBERY ARMED - OTHER DANGEROUS WEAPON VEHICLE NON-COMMERCIAL FALSO VERDADEIRO 613 6 17 71 3 1170070 1850779 41746028324 -87652403681 (41.746028324, -87.652403681)
JD417032 10/31/2020 06:00:00 PM 094XX S COTTAGE GROVE AVE 031A ROBBERY ARMED - HANDGUN GAS STATION FALSO VERDADEIRO 633 6 8 49 3 1183219 1842276 41722399492 -87604487196 (41.722399492, -87.604487196)

Mudança no padrão das datas e Casos repetidos

Um dos passos importantes na limpeza dos dados é a remoção dos casos duplicados e padronização das datas. Por padrão estrangeiro, a coluna Date é dada por MÊS/DIA/ANO, para facilitar é mudado para DIA/MÊS/ANO. Já as duplicatas não podem acontecer devido a confiabilidade das análises. A mudanças

crimes_data <- crimes_data %>% mutate(Date = as.Date(Date, format = "%m/%d/%Y")) %>%
  mutate(Date = format(Date, "%d/%m/%Y")) %>% distinct(Case.Number, .keep_all = TRUE)
knitr::kable(head(crimes_data, 100))
Case.Number Date Time AM.PM Block IUCR Primary.Type Description Location.Description Arrest Domestic Beat District Ward Community.Area FBI.Code X.Coordinate Y.Coordinate Latitude Longitude Location
JD193500 18/03/2020 11:15:00 PM 009XX W MONTANA ST 1320 CRIMINAL DAMAGE TO VEHICLE RESIDENCE FALSO FALSO 1932 19 43 7 14 -2147483648 -2147483648 NA NA
JE202728 16/04/2021 08:45:00 PM 056XX N RIDGE AVE 820 THEFT $500 AND UNDER OTHER (SPECIFY) FALSO FALSO 2013 20 48 77 6 -2147483648 -2147483648 NA NA
JD458715 11/12/2020 06:00:00 PM 019XX N LAWNDALE AVE 810 THEFT OVER $500 RESIDENCE - GARAGE FALSO FALSO 2535 25 26 22 6 -2147483648 -2147483648 NA NA
JD461361 08/12/2020 01:16:00 PM 041XX N BERNARD ST 820 THEFT $500 AND UNDER RESIDENCE - PORCH / HALLWAY FALSO FALSO 1723 17 35 16 6 -2147483648 -2147483648 NA NA
JD456506 11/12/2020 06:45:00 PM 010XX W MADISON ST 910 MOTOR VEHICLE THEFT AUTOMOBILE STREET FALSO FALSO 1232 12 25 28 7 1169700 1900215 41881693864 -87652323905 (41.881693864, -87.652323905)
JE276700 23/06/2021 11:39:00 AM 007XX N KEDZIE AVE 2024 NARCOTICS POSSESS - HEROIN (WHITE) SIDEWALK VERDADEIRO FALSO 1121 11 27 23 18 -2147483648 -2147483648 NA NA
JE252347 02/06/2021 11:30:00 AM 004XX W 27TH ST 2018 NARCOTICS MANUFACTURE / DELIVER - SYNTHETIC DRUGS STREET VERDADEIRO FALSO 914 9 11 60 18 -2147483648 -2147483648 NA NA
JD461506 03/12/2020 12:38:00 PM 065XX N WHIPPLE ST 820 THEFT $500 AND UNDER RESIDENCE FALSO FALSO 2412 24 50 2 6 -2147483648 -2147483648 NA NA
JD194176 18/03/2020 11:30:00 AM 020XX S MICHIGAN AVE 820 THEFT $500 AND UNDER APARTMENT FALSO FALSO 131 1 3 33 6 -2147483648 -2147483648 NA NA
JE332953 10/08/2021 04:20:00 PM 016XX W VAN BUREN ST 2018 NARCOTICS MANUFACTURE / DELIVER - SYNTHETIC DRUGS VEHICLE NON-COMMERCIAL VERDADEIRO FALSO 1231 12 27 28 18 -2147483648 -2147483648 NA NA
JD189865 18/03/2020 07:20:00 PM 106XX S GREEN ST 1153 DECEPTIVE PRACTICE FINANCIAL IDENTITY THEFT OVER $ 300 RESIDENCE FALSO FALSO 2233 22 34 73 11 1172534 1834306 41700770216 -87643858519 (41.700770216, -87.643858519)
JD329584 09/08/2020 06:01:00 PM 042XX N HERMITAGE AVE 810 THEFT OVER $500 RESIDENCE - YARD (FRONT / BACK) FALSO FALSO 1912 19 47 6 6 -2147483648 -2147483648 NA NA
JD189881 18/03/2020 07:03:00 PM 004XX W 71ST ST 143A WEAPONS VIOLATION UNLAWFUL POSSESSION - HANDGUN STREET VERDADEIRO FALSO 732 7 6 68 15 1174266 1857844 41765323402 -87636819109 (41.765323402, -87.636819109)
JD189665 18/03/2020 04:15:00 PM 057XX S ALBANY AVE 4651 OTHER OFFENSE SEX OFFENDER - FAIL TO REGISTER NEW ADDRESS RESIDENCE FALSO FALSO 824 8 14 63 26 1156693 1866467 41789358619 -87700997541 (41.789358619, -87.700997541)
JD189720 18/03/2020 04:45:00 PM 014XX S CENTRAL PARK AVE 486 BATTERY DOMESTIC BATTERY SIMPLE RESIDENCE FALSO VERDADEIRO 1011 10 24 29 08B 1152607 1892849 41861835803 -87715283861 (41.861835803, -87.715283861)
JD189272 18/03/2020 07:00:00 AM 072XX S MARSHFIELD AVE 497 BATTERY AGGRAVATED DOMESTIC BATTERY - OTHER DANGEROUS WEAPON RESIDENCE FALSO VERDADEIRO 735 7 17 67 04B 1166597 1856663 41762249552 -87664962008 (41.762249552, -87.664962008)
JD190363 18/03/2020 06:00:00 PM 056XX S RACINE AVE 1310 CRIMINAL DAMAGE TO PROPERTY ABANDONED BUILDING FALSO FALSO 712 7 16 68 14 1169282 1867411 41791685711 -87654810301 (41.791685711, -87.654810301)
JD189649 18/03/2020 03:54:00 PM 011XX S RICHMOND ST 460 BATTERY SIMPLE APARTMENT FALSO FALSO 1135 11 28 29 08B 1156864 1894979 41867595589 -8769959933 (41.867595589, -87.69959933)
JD329629 09/08/2020 11:00:00 PM 001XX W WASHINGTON ST 610 BURGLARY FORCIBLE ENTRY OTHER (SPECIFY) FALSO FALSO 122 1 42 32 5 1174897 1900809 41883209085 -87633223046 (41.883209085, -87.633223046)
JG321093 29/06/2023 04:08:00 PM 010XX N CHRISTIANA AVE 1320 CRIMINAL DAMAGE TO VEHICLE STREET FALSO FALSO 1121 11 26 23 14 1153797 1906894 41900353139 -87710541402 (41.900353139, -87.710541402)
JD190205 19/03/2020 09:08:00 AM 042XX S INDIANA AVE 1310 CRIMINAL DAMAGE TO PROPERTY APARTMENT FALSO FALSO 213 2 3 38 14 1178304 1876982 41817749235 -87621437827 (41.817749235, -87.621437827)
JE327386 05/08/2021 01:00:00 PM 045XX S SAWYER AVE 620 BURGLARY UNLAWFUL ENTRY RESIDENCE FALSO FALSO 821 8 14 58 5 1155459 1874401 41811155434 -87705309714 (41.811155434, -87.705309714)
JD326107 09/08/2020 12:30:00 PM 031XX W ROOSEVELT RD 1320 CRIMINAL DAMAGE TO VEHICLE STREET FALSO FALSO 1134 11 24 29 14 1155802 1894546 41866428839 -87703509785 (41.866428839, -87.703509785)
JD191260 19/03/2020 03:43:00 PM 036XX W OAKDALE AVE 820 THEFT $500 AND UNDER RESIDENCE - PORCH / HALLWAY FALSO FALSO 2523 25 30 21 6 -2147483648 -2147483648 NA NA
JE202919 16/04/2021 09:00:00 PM 007XX S CLARK ST 560 ASSAULT SIMPLE RESIDENCE - PORCH / HALLWAY FALSO FALSO 123 1 4 32 08A 1175633 1897092 41872992906 -8763063219 (41.872992906, -87.63063219)
JD328718 09/08/2020 12:00:00 AM 013XX N Wolcott Ave 820 THEFT $500 AND UNDER APARTMENT FALSO FALSO 1424 14 1 24 6 -2147483648 -2147483648 NA NA
JD194649 12/03/2020 11:59:00 AM 039XX N SOUTHPORT AVE 820 THEFT $500 AND UNDER APARTMENT FALSO FALSO 1922 19 47 6 6 -2147483648 -2147483648 NA NA
JD191217 19/03/2020 03:00:00 PM 063XX S LAVERGNE AVE 820 THEFT $500 AND UNDER RESIDENCE FALSO FALSO 813 8 13 64 6 -2147483648 -2147483648 NA NA
JD194488 16/03/2020 05:00:00 PM 012XX W GRANVILLE AVE 890 THEFT FROM BUILDING RESIDENCE - PORCH / HALLWAY FALSO FALSO 2433 24 48 77 6 -2147483648 -2147483648 NA NA
JD190184 19/03/2020 04:00:00 AM 073XX N HARLEM AVE 2820 OTHER OFFENSE TELEPHONE THREAT APARTMENT FALSO VERDADEIRO 1611 16 41 9 08A 1127389 1948225 42014255166 -87806607683 (42.014255166, -87.806607683)
JF407076 22/09/2022 11:00:00 PM 010XX W RANDOLPH ST 810 THEFT OVER $500 STREET FALSO FALSO 1224 12 27 28 6 1169327 1901202 41884410376 -87653664839 (41.884410376, -87.653664839)
JD461729 01/06/2020 07:00:00 AM 034XX W 116TH ST 1154 DECEPTIVE PRACTICE FINANCIAL IDENTITY THEFT $300 AND UNDER FALSO FALSO 2211 22 19 74 11 -2147483648 -2147483648 NA NA
JD325954 09/08/2020 09:58:00 AM 082XX S STATE ST 1310 CRIMINAL DAMAGE TO PROPERTY GAS STATION FALSO FALSO 631 6 6 44 14 1177732 1850157 41744151668 -8762434741 (41.744151668, -87.62434741)
JE445271 14/11/2021 05:00:00 PM 028XX S PULASKI RD 1320 CRIMINAL DAMAGE TO VEHICLE STREET FALSO FALSO 1031 10 22 30 14 1150172 1884823 41839859214 -87724431324 (41.839859214, -87.724431324)
JD461498 02/12/2020 02:23:00 PM 015XX W GARFIELD BLVD 820 THEFT $500 AND UNDER APARTMENT FALSO FALSO 934 9 16 61 6 -2147483648 -2147483648 NA NA
JD461358 10/12/2020 08:00:00 PM 019XX S Michigan Ave 1310 CRIMINAL DAMAGE TO PROPERTY CHURCH / SYNAGOGUE / PLACE OF WORSHIP FALSO FALSO 131 1 3 33 14 -2147483648 -2147483648 NA NA
JF259485 29/05/2022 12:00:00 AM 014XX S MUSEUM CAMPUS DR 870 THEFT POCKET-PICKING SPORTS ARENA / STADIUM FALSO FALSO 132 1 4 33 6 -2147483648 -2147483648 NA NA
JD456251 11/12/2020 12:54:00 PM 011XX N HOYNE AVE 1154 DECEPTIVE PRACTICE FINANCIAL IDENTITY THEFT $300 AND UNDER APARTMENT FALSO FALSO 1212 12 32 24 11 1162192 1907753 41902538926 -8767968215 (41.902538926, -87.67968215)
JD191086 20/03/2020 10:30:00 AM 075XX S STONY ISLAND AVE 460 BATTERY SIMPLE HOSPITAL BUILDING / GROUNDS FALSO FALSO 411 4 8 43 08B 1188234 1855158 41757630995 -87585708249 (41.757630995, -87.585708249)
JD456245 11/12/2020 02:57:00 PM 054XX W CONGRESS PKWY 4387 OTHER OFFENSE VIOLATE ORDER OF PROTECTION RESIDENCE FALSO VERDADEIRO 1522 15 29 25 26 1140327 1897153 41873880295 -87760256803 (41.873880295, -87.760256803)
JD456096 11/12/2020 12:30:00 PM 081XX S CAMPBELL AVE 486 BATTERY DOMESTIC BATTERY SIMPLE RESIDENCE FALSO VERDADEIRO 835 8 18 70 08B 1161108 1850689 41745971272 -87685244965 (41.745971272, -87.685244965)
JD194045 16/03/2020 08:00:00 PM 031XX W MARQUETTE RD 2820 OTHER OFFENSE TELEPHONE THREAT APARTMENT FALSO VERDADEIRO 831 8 17 66 08A 1156439 1860025 41771685949 -87702102281 (41.771685949, -87.702102281)
JE206873 20/02/2021 01:10:00 PM 0000X N STATE ST 860 THEFT RETAIL THEFT SMALL RETAIL STORE FALSO FALSO 112 1 42 32 6 -2147483648 -2147483648 NA NA
JD195603 06/02/2020 05:25:00 PM 062XX N ROCKWELL ST 820 THEFT $500 AND UNDER APARTMENT FALSO FALSO 2413 24 50 2 6 -2147483648 -2147483648 NA NA
JE205409 16/04/2021 09:05:00 AM 021XX W BERTEAU AVE 1154 DECEPTIVE PRACTICE FINANCIAL IDENTITY THEFT $300 AND UNDER FALSO FALSO 1911 19 47 5 11 -2147483648 -2147483648 NA NA
JE206664 25/09/2020 12:00:00 AM 0000X W 125TH ST 1153 DECEPTIVE PRACTICE FINANCIAL IDENTITY THEFT OVER $ 300 RESIDENCE FALSO FALSO 523 5 9 53 11 -2147483648 -2147483648 NA NA
JD191609 20/03/2020 08:40:00 PM 004XX W 103RD ST 2093 NARCOTICS FOUND SUSPECT NARCOTICS VEHICLE NON-COMMERCIAL VERDADEIRO FALSO 2232 22 34 49 18 1175106 1836607 41707027606 -87634372432 (41.707027606, -87.634372432)
JE205512 16/04/2021 02:35:00 AM 067XX N NEWGARD AVE 820 THEFT $500 AND UNDER RESIDENCE - YARD (FRONT / BACK) FALSO FALSO 2432 24 49 1 6 -2147483648 -2147483648 NA NA
JE206874 12/04/2021 09:04:00 AM 0000X N STATE ST 860 THEFT RETAIL THEFT SMALL RETAIL STORE FALSO FALSO 112 1 42 32 6 -2147483648 -2147483648 NA NA
JE203657 16/04/2021 10:00:00 PM 037XX W POLK ST 820 THEFT $500 AND UNDER STREET FALSO FALSO 1133 11 24 27 6 1151665 1896118 41870824869 -87718655889 (41.870824869, -87.718655889)
JE205431 12/04/2021 05:00:00 PM 015XX W GRAND AVE 1156 DECEPTIVE PRACTICE ATTEMPT - FINANCIAL IDENTITY THEFT RESIDENCE FALSO FALSO 1215 12 1 24 11 1165934 1903575 41890995133 -87666056556 (41.890995133, -87.666056556)
JF413864 01/03/2020 12:00:00 AM 069XX S CALUMET AVE 1153 DECEPTIVE PRACTICE FINANCIAL IDENTITY THEFT OVER $ 300 RESIDENCE FALSO FALSO 322 3 6 69 11 -2147483648 -2147483648 NA NA
JE202720 16/04/2021 06:00:00 PM 006XX W MADISON ST 820 THEFT $500 AND UNDER APARTMENT FALSO FALSO 121 1 42 28 6 -2147483648 -2147483648 NA NA
JD191015 20/03/2020 08:30:00 AM 022XX E 69TH ST 486 BATTERY DOMESTIC BATTERY SIMPLE APARTMENT FALSO FALSO 331 3 5 43 08B 1192217 1859649 41769858738 -87570965451 (41.769858738, -87.570965451)
JE205551 15/04/2021 12:00:00 AM 063XX N LAKEWOOD AVE 820 THEFT $500 AND UNDER STREET FALSO FALSO 2433 24 48 77 6 1166468 1942205 41996986268 -87662985961 (41.996986268, -87.662985961)
JE205682 28/08/2020 02:00:00 PM 006XX W 115TH ST 486 BATTERY DOMESTIC BATTERY SIMPLE RESIDENCE FALSO VERDADEIRO 2233 22 34 49 08B -2147483648 -2147483648 NA NA
JE200900 16/04/2021 07:25:00 AM 082XX S MARSHFIELD AVE 1320 CRIMINAL DAMAGE TO VEHICLE APARTMENT FALSO FALSO 614 6 21 71 14 -2147483648 -2147483648 NA NA
JE333631 05/08/2021 04:30:00 AM 062XX W EDDY ST 810 THEFT OVER $500 VEHICLE NON-COMMERCIAL FALSO FALSO 1633 16 36 17 6 -2147483648 -2147483648 NA NA
JD416883 31/10/2020 05:33:00 PM 019XX N LA CROSSE AVE 495 BATTERY AGGRAVATED OF A SENIOR CITIZEN RESIDENCE VERDADEIRO FALSO 2533 25 36 19 04B 1143745 1912640 41916315095 -87747319 (41.916315095, -87.747319)
JF408212 23/09/2022 07:45:00 PM 001XX W HURON ST 486 BATTERY DOMESTIC BATTERY SIMPLE SIDEWALK FALSO VERDADEIRO 1832 18 2 8 08B 1175253 1905045 41894824927 -87631788635 (41.894824927, -87.631788635)
JD329925 10/08/2020 03:40:00 PM 007XX W 59TH ST 1153 DECEPTIVE PRACTICE FINANCIAL IDENTITY THEFT OVER $ 300 FALSO FALSO 711 7 20 68 11 -2147483648 -2147483648 NA NA
JD328242 10/08/2020 05:00:00 PM 019XX N DRAKE AVE 820 THEFT $500 AND UNDER RESIDENCE FALSO FALSO 1422 14 26 22 6 -2147483648 -2147483648 NA NA
JE327597 05/08/2021 05:30:00 PM 016XX E 74TH PL 620 BURGLARY UNLAWFUL ENTRY APARTMENT FALSO FALSO 324 3 8 43 5 1188511 1855912 41759693428 -87584669047 (41.759693428, -87.584669047)
JG335489 09/07/2023 12:30:00 AM 007XX N DAMEN AVE 890 THEFT FROM BUILDING BAR OR TAVERN FALSO FALSO 1221 12 36 24 6 -2147483648 -2147483648 NA NA
JE207145 24/12/2020 03:00:00 PM 002XX W 37TH ST 1751 OFFENSE INVOLVING CHILDREN CRIMINAL SEXUAL ABUSE BY FAMILY MEMBER APARTMENT FALSO VERDADEIRO 915 9 3 34 17 -2147483648 -2147483648 NA NA
JG325452 29/06/2023 08:00:00 PM 032XX N Clark ST 1150 DECEPTIVE PRACTICE CREDIT CARD FRAUD OTHER (SPECIFY) FALSO FALSO 1924 19 44 6 11 -2147483648 -2147483648 NA NA
JD327087 10/08/2020 11:00:00 AM 015XX S HAMLIN AVE 486 BATTERY DOMESTIC BATTERY SIMPLE SIDEWALK FALSO VERDADEIRO 1014 10 24 29 08B 1151295 1892195 41860066967 -87720117178 (41.860066967, -87.720117178)
JG329085 25/04/2023 11:43:00 AM 040XX S ALBANY AVE 820 THEFT $500 AND UNDER RESIDENCE FALSO FALSO 921 9 12 58 6 1156351 1877492 41819619605 -87701954595 (41.819619605, -87.701954595)
JE206585 23/09/2020 09:00:00 AM 037XX N HALSTED ST 1153 DECEPTIVE PRACTICE FINANCIAL IDENTITY THEFT OVER $ 300 APARTMENT FALSO FALSO 1923 19 46 6 11 -2147483648 -2147483648 NA NA
JD190926 20/03/2020 03:30:00 AM 062XX S DR MARTIN LUTHER KING JR DR 1310 CRIMINAL DAMAGE TO PROPERTY RESIDENCE FALSO FALSO 313 3 20 42 14 1179993 1863678 41781203314 -87615649592 (41.781203314, -87.615649592)
JD192042 20/03/2020 09:00:00 PM 017XX E 83RD ST 460 BATTERY SIMPLE RESIDENCE - YARD (FRONT / BACK) FALSO VERDADEIRO 412 4 8 45 08B 1189161 1850288 41744245112 -87582466725 (41.744245112, -87.582466725)
JG329883 29/06/2023 04:00:00 AM 016XX N LOCKWOOD AVE 2820 OTHER OFFENSE TELEPHONE THREAT APARTMENT FALSO VERDADEIRO 2532 25 37 25 08A 1140812 1910557 419106536 -87758146182 (41.9106536, -87.758146182)
JD249122 31/05/2020 02:27:00 PM 062XX S KEDZIE AVE 610 BURGLARY FORCIBLE ENTRY DEPARTMENT STORE FALSO FALSO 823 8 14 66 5 1156132 1862862 41779477279 -87703151446 (41.779477279, -87.703151446)
JF122951 24/01/2022 05:30:00 PM 018XX W GRAND AVE 910 MOTOR VEHICLE THEFT AUTOMOBILE STREET FALSO FALSO 1221 12 36 24 7 1164069 1903522 41890889291 -87672907259 (41.890889291, -87.672907259)
JD192549 21/03/2020 04:28:00 PM 047XX W ADDISON ST 1130 DECEPTIVE PRACTICE FRAUD OR CONFIDENCE GAME RESIDENCE FALSO FALSO 1731 17 30 15 11 1144251 1923517 4194615313 -87745185825 (41.94615313, -87.745185825)
JF328862 23/07/2022 04:00:00 PM 069XX W 64TH PL 486 BATTERY DOMESTIC BATTERY SIMPLE RESIDENCE VERDADEIRO VERDADEIRO 812 8 13 64 08B 1131307 1860969 41774745709 -87794208216 (41.774745709, -87.794208216)
JF335627 29/07/2022 03:09:00 AM 052XX N NAGLE AVE 550 ASSAULT AGGRAVATED POLICE OFFICER - HANDGUN STREET FALSO FALSO 1613 16 41 10 04A 1132572 1934567 41976687342 -87787856137 (41.976687342, -87.787856137)
JF439075 18/10/2022 12:00:00 AM 005XX S CENTRAL AVE 1582 OFFENSE INVOLVING CHILDREN CHILD PORNOGRAPHY SIDEWALK FALSO FALSO 1522 15 29 25 17 1139141 1897035 41873578134 -87764614167 (41.873578134, -87.764614167)
JF467255 07/11/2022 12:00:00 AM 065XX S MOZART ST 1750 OFFENSE INVOLVING CHILDREN CHILD ABUSE RESIDENCE FALSO FALSO 831 8 15 66 08B 1158504 1861158 41774753227 -87694501757 (41.774753227, -87.694501757)
JF484488 22/11/2022 10:01:00 PM 0000X W 114TH PL 143A WEAPONS VIOLATION UNLAWFUL POSSESSION - HANDGUN RESIDENCE VERDADEIRO FALSO 522 5 9 49 15 1177990 1829046 41686214418 -87624039314 (41.686214418, -87.624039314)
JF367998 23/08/2022 10:29:00 PM 055XX S PRAIRIE AVE 041A BATTERY AGGRAVATED - HANDGUN APARTMENT FALSO VERDADEIRO 231 2 20 40 04B 1178988 1868183 41793588428 -87619196923 (41.793588428, -87.619196923)
JF517984 20/12/2022 08:45:00 PM 083XX S OGLESBY AVE 325 ROBBERY VEHICULAR HIJACKING VEHICLE NON-COMMERCIAL FALSO FALSO 412 4 7 46 3 1193289 1850362 41744348335 -87567339144 (41.744348335, -87.567339144)
JD191822 21/03/2020 07:00:00 AM 036XX S MICHIGAN AVE 460 BATTERY SIMPLE APARTMENT FALSO FALSO 212 2 3 35 08B 1177787 1881111 41829091287 -87623209136 (41.829091287, -87.623209136)
JD191757 21/03/2020 01:30:00 AM 011XX S RICHMOND ST 1310 CRIMINAL DAMAGE TO PROPERTY SIDEWALK FALSO VERDADEIRO 1135 11 28 29 14 1156864 1894979 41867595589 -8769959933 (41.867595589, -87.69959933)
JD327221 10/08/2020 01:00:00 PM 019XX W FARGO AVE 910 MOTOR VEHICLE THEFT AUTOMOBILE STREET FALSO FALSO 2424 24 49 1 7 1161876 1949332 42016640344 -87679677859 (42.016640344, -87.679677859)
JD327028 10/08/2020 01:00:00 AM 008XX E 46TH ST 2826 OTHER OFFENSE HARASSMENT BY ELECTRONIC MEANS APARTMENT FALSO FALSO 221 2 4 39 26 1182577 1874691 41811364344 -87605834495 (41.811364344, -87.605834495)
JD328722 10/08/2020 02:00:00 AM 0000X W HURON ST 610 BURGLARY FORCIBLE ENTRY OTHER (SPECIFY) FALSO FALSO 1832 18 2 8 5 1175614 1905055 4189484426 -87630462495 (41.89484426, -87.630462495)
JD196925 13/03/2020 01:47:00 PM 028XX W LOGAN BLVD 820 THEFT $500 AND UNDER APARTMENT FALSO FALSO 1411 14 32 22 6 -2147483648 -2147483648 NA NA
JD192764 22/03/2020 10:00:00 AM 005XX W 45TH PL 910 MOTOR VEHICLE THEFT AUTOMOBILE STREET FALSO FALSO 925 9 11 61 7 1173554 1874750 41811731082 -87638928321 (41.811731082, -87.638928321)
JG328444 25/05/2022 12:00:00 AM 066XX N ASHLAND AVE 1153 DECEPTIVE PRACTICE FINANCIAL IDENTITY THEFT OVER $ 300 APARTMENT FALSO FALSO 2432 24 49 1 11 -2147483648 -2147483648 NA NA
JG338154 01/04/2022 02:00:00 PM 032XX N CAMPBELL AVE 810 THEFT OVER $500 POLICE FACILITY / VEHICLE PARKING LOT FALSO FALSO 1921 19 47 5 6 -2147483648 -2147483648 NA NA
JG326902 27/06/2023 04:30:00 PM 065XX N NEWGARD AVE 810 THEFT OVER $500 STREET FALSO FALSO 2432 24 49 1 6 1165416 1943519 42000614448 -87666818201 (42.000614448, -87.666818201)
JG342405 03/07/2023 12:01:00 AM 072XX S LUELLA AVE 1150 DECEPTIVE PRACTICE CREDIT CARD FRAUD RESIDENCE FALSO FALSO 333 3 5 43 11 1192470 1857394 41763664689 -87570111425 (41.763664689, -87.570111425)
JG320179 28/06/2023 11:04:00 PM 036XX N KEDZIE AVE 110 HOMICIDE FIRST DEGREE MURDER ALLEY VERDADEIRO FALSO 1733 17 33 16 01A 1154405 1924119 41947607802 -87707846683 (41.947607802, -87.707846683)
JD192888 22/03/2020 06:24:00 PM 039XX S LA SALLE ST 470 PUBLIC PEACE VIOLATION RECKLESS CONDUCT STREET VERDADEIRO FALSO 213 2 3 37 24 1176051 1879069 41823527068 -87629639751 (41.823527068, -87.629639751)
JG321314 29/06/2023 07:40:00 PM 066XX S STEWART AVE 110 HOMICIDE FIRST DEGREE MURDER STREET FALSO FALSO 722 7 6 68 01A 1174775 1860707 41773168477 -87634868256 (41.773168477, -87.634868256)
JD115727 14/01/2020 05:45:00 PM 115XX S WENTWORTH AVE 320 ROBBERY STRONG ARM - NO WEAPON ALLEY FALSO VERDADEIRO 522 5 9 53 3 1177004 1828423 41684527033 -87627667538 (41.684527033, -87.627667538)
JD398656 13/10/2020 08:00:00 PM 007XX E 82ND ST 330 ROBBERY AGGRAVATED STREET FALSO FALSO 631 6 6 44 3 1182901 1850799 41745794957 -87605387935 (41.745794957, -87.605387935)
JD398836 14/10/2020 06:00:00 AM 081XX S MAY ST 313 ROBBERY ARMED - OTHER DANGEROUS WEAPON VEHICLE NON-COMMERCIAL FALSO VERDADEIRO 613 6 17 71 3 1170070 1850779 41746028324 -87652403681 (41.746028324, -87.652403681)
JD417032 31/10/2020 06:00:00 PM 094XX S COTTAGE GROVE AVE 031A ROBBERY ARMED - HANDGUN GAS STATION FALSO VERDADEIRO 633 6 8 49 3 1183219 1842276 41722399492 -87604487196 (41.722399492, -87.604487196)

Informações Resumidas

Basicamente a base de dados é um relato sobre os crimes cometidos em Chicago de 2000-2023, tendo classificações quanto ao tipo de crime, localização, coordenadas geográficas, data, uma descrição sobre o crime, distrito policial e local, podendo realizar análises de locais, número de crimes, tipos, entre outras. As colunas Arrest e Domestic são descritas como Verdadeira ou Falso.

ANÁLISE EXPLORATÓRIA DOS DADOS

Como se comporta a quantidade de crimes por Ano?

Como os dados são de crimes ocorridos em Chicago, a primeira análise é feita visualizando esse comportamento por meio dos anos. Para responder a pergunta é necessário utilizar a coluna Date e extrair o ano de cada data, depois criar uma tabela com os valores dos crimes por anos, assim tendo uma análise precisa se os crimes aumentaram ou diminuiram. Para isso é utilizado o pacote ggplot, capaz de gerar um gráfico de barras que relaciona o ano e total de crimes, conforme o código abaixo:

library(ggplot2)

crimes_data$Date <- as.Date(crimes_data$Date, format = "%d/%m/%Y")
crimes_data$Year <- format(crimes_data$Date, "%Y")

annual_crimes <- crimes_data %>% group_by(Year) %>%
  summarise(CrimeCount = n())

# Plotar o gráfico
ggplot(annual_crimes, aes(x = Year, y = CrimeCount)) +
  geom_bar(stat = "identity", fill = "lightblue") +
  geom_text(aes(label = CrimeCount), vjust = -0.5, size = 3.5) +
  labs(title = "Quantidade de crimes por ano",
       x = "Ano",
       y = "Quantidade de Crimes") +
  theme_minimal() +
  theme(
    plot.title = element_text(hjust = 0.5)  # Centralizar o título
  )

É possível notar que os crimes em Chicago vinham de uma crescente de 12,5 % de 2020 para 2023. Porém no ano de 2023, comparado com o ano de 2022, teve uma diminuição de 40 %, mostrando que a adoção do plano “Our City, Our Safety”, lançado pela Prefeitura de Chicago, está fazendo efeito.Este plano visa reduzir a violência de forma sustentável, abordando as causas profundas da criminalidade, como desigualdades e desinvestimentos sistêmicos, e implementando intervenções baseadas na comunidade.

Quais os principais tipos de crime e quais as mudanças nos últimos anos?

Para responder a pergunta é possível plotar o gráfico dos 5 principais tipos de Crime e seus números durante 2020-2023. Os cinco principais Crimes ocorridos com maior frequência foram Assault, Baterry, Criminal Damage, Deceptive practice e theft. Podemos confirmar o padrão de que em 2023 houve uma diminuição nos crimes por meio da figura abaixo.

library(dplyr)
library(ggplot2)

# Definir cores desejadas
cores <- c("#FF5733", "#3498DB", "#2ECC71", "#F1C40F")

# Adicionar uma coluna de ano aos dados
crimes_data <- crimes_data %>%
  mutate(Year = lubridate::year(Date))

# Calcular o número total de ocorrências para cada tipo de crime e ano
crime_counts <- crimes_data %>%
  group_by(Year, `Primary.Type`) %>%
  summarise(Count = n())

# Selecionar os 5 principais tipos de crime
top_crimes <- crime_counts %>%
  group_by(`Primary.Type`) %>%
  summarise(Total_Count = sum(Count)) %>%
  top_n(5, Total_Count)

# Filtrar os dados originais para incluir apenas os 5 principais tipos de crime
filtered_data <- crime_counts %>%
  filter(`Primary.Type` %in% top_crimes$Primary.Type)

# Plotar o gráfico de barras agrupadas por ano para cada tipo de crime
ggplot(filtered_data, aes(x = `Primary.Type`, y = Count, fill = factor(Year))) +
  geom_bar(stat = "identity", position = "dodge") +
  scale_fill_manual(values = cores) +  # Especificar as cores manualmente
  labs(title = "Ocorrencias de crimes por tipo em seus respectivos anos",
       x = "Tipo de Crime",
       y = "Numero de Ocorrencias",
       fill = "Ano") +
  theme_minimal() +
  theme(axis.text.x = element_text(angle = 45, hjust = 1),
        plot.title = element_text(hjust = 0.5)) +  # Centralizar o título
  geom_text(aes(label = Count), 
            position = position_dodge(width = 0.9), 
            vjust = -0.5, 
            size = 2,
            color = "black")

É possível perceber dentre os crimes mais praticado, o roubo é o maior entre eles e que todos os crimes tiveram diminuições severadas de 2022 para 2023. Nota-se que as políticas de “Our City, Our Safety” estão ajudando a controlar a criminalidade na cidade. Em 2023 houve uma diminuição de aproximadamente 40 % para os principais crimes relatados na polícia.

Analise comparativa entre o crimes onde há ou não prisão

Dentre os crimes da base, eles podem ou não ocorrer prisão, o que é determinado pelo coluna Arrest. Para entender o comportamento dessa coluna é necessário comparar os principais crimes ocorridos quando há ou não prisão, por meio da Figura abaixo:

library(dplyr)
library(ggplot2)

# Desagrupando os dados antes de continuar
ungrouped_crimes_data <- crimes_data %>%
  ungroup()

# Contando os tipos de crime com e sem prisão
counts <- ungrouped_crimes_data %>%
  count(Primary.Type, Arrest) %>%
  mutate(percent = prop.table(n) * 100)

# Selecionando os 5 principais tipos de crime com prisão (Arrest == TRUE)
top_with_arrest <- counts %>%
  filter(Arrest == "VERDADEIRO") %>%
  top_n(5)

# Selecionando os 5 principais tipos de crime sem prisão (Arrest == FALSE)
top_without_arrest <- counts %>%
  filter(Arrest == "FALSO") %>%
  top_n(5)

# Combinando os dados dos 5 principais com e sem prisão
top_combined <- bind_rows(
  mutate(top_with_arrest, Arrest = "VERDADEIRO"),
  mutate(top_without_arrest, Arrest = "FALSO")
)

# Criando o gráfico de barras lado a lado com porcentagens
ggplot(top_combined, aes(x = Arrest, y = n, fill = Primary.Type)) +
  geom_bar(stat = "identity", position = "dodge", width = 0.7) +
  geom_text(aes(label = paste(round(prop.table(n) * 100, 1), "%")), 
            position = position_dodge(width = 0.7), 
            vjust = -0.5, 
            size = 2.5, 
            color = "black") +
  labs(x = "Prisao (Arrest)", y = "Contagem", fill = "Tipo de Crime") +
  ggtitle("Principais tipos de crime que ocorreu ou não prisao") +
  theme_minimal()

É possível reparar que o assalto(theft) é o que mais não ocorre prisão e o que menos ocorre prisão. Levando em conta que ele é o crime que mais ocorre em Chicago, porque não ser o que tem mais prisões? isso seria um bom questionamento para as autoridades e um bom dado para levantar políticas para ajudar a prender mais assaltantes.

Quais os principais descrições de crimes?

As descrições de crimes mais recorrentes estão presentes na figura abaixo, podendo ser visualizadas utilizando o pacote ggplot2 e dplyr para manipular a base.

library(dplyr)
library(ggplot2)

# Desagrupando os dados antes de continuar
ungrouped_crimes_data <- crimes_data %>%
  ungroup()

# Contando as ocorrências por descrição (Description)
top_descriptions <- ungrouped_crimes_data %>%
  count(Description, sort = TRUE) %>%
  top_n(5)

# Calculando as porcentagens para cada descrição
top_descriptions <- top_descriptions %>%
  mutate(percent = n / sum(n) * 100)

# Criando o gráfico de pizza das 5 principais descrições com porcentagens
ggplot(top_descriptions, aes(x = "", y = percent, fill = Description, label = paste0(round(percent, 1), "%"))) +
  geom_bar(stat = "identity", width = 1) +
  coord_polar(theta = "y") +
  geom_text(position = position_stack(vjust = 0.5), size = 3, color = "white") +
  labs(fill = "Descricao", 
       title = "5 Principais descricoes de Crime") +
  theme_void() +
  theme(legend.position = "right",
        plot.title = element_text(hjust = 0.5))

É possível notar que os simples e domésticos simples são as descrições mais frequentes dentre o top 5 descrições de crimes. Como roubo é o principal tipo de crime, faz sentido os principais descrições serem perda de dinheiro e veículos. A tabela abaixo mostra a distribuição das quantidades por descrição de crime e sua respetivas porcentagem dentro do top 5.

knitr::kable(head(top_descriptions, 5))
Description n percent
SIMPLE 91666 27.87573
DOMESTIC BATTERY SIMPLE 70454 21.42514
$500 AND UNDER 62721 19.07353
OVER $500 55554 16.89403
TO VEHICLE 48443 14.73157

CONCLUSÃO

Neste estudo, abordamos a análise dos dados de crimes em Chicago entre os anos de 2021 a 2023, focando especificamente na relação entre o tipo de crime e a ocorrência de prisões. O objetivo foi identificar os principais tipos de crimes que resultaram em prisões e aqueles que não resultaram, fornecendo insights valiosos para entender os padrões criminais na cidade.

Utilizamos a base de dados crimes_data do Kaggle, que contém informações detalhadas sobre crimes, incluindo tipos de crime (Primary Type) e se houve ou não prisões (Arrest). A metodologia empregada envolveu análise exploratória de dados, visualizações gráficas com ggplot2 em R, e cálculo de proporções e percentagens para compreender a distribuição dos crimes com relação às prisões.

Por meio das análises foi possível relatar que entre 2020-2022 houve um aumento de crimes, porém com a política “Our City, Our Safety”, empregada em Chicago, os números diminuiram consideravelmente 2022-2023. O crime mais praticado durante o período foi o roubo, batendo os outros 4(Assalut, Baterry, Criminal Damage e Deceptive Practive.

Outro ponto importante é a relação entre os crimes que tiveram prisão e não prisão, sendo o roubo, o principal crime que não tem prisões e o que mais acontece prisão o Battery.

Para agências de segurança pública e formuladores de políticas, entender quais tipos de crimes têm maior probabilidade de resultar em prisões pode informar estratégias mais eficazes de aplicação da lei e alocação de recursos. Isso pode ajudar na redução da criminalidade e na melhoria da segurança pública na cidade de Chicago e em outras áreas urbanas semelhantes.

A análise também é válida para turistas que pretendem viajar para os EUA e visitar Chicago, notando que a metrópole reduziu consideravelmente a quantidade de crimes ocorridos do ano de 2022-2023.

Como limitação do trabalho temos o banco de dados ser muito grande, dificultando o manuseio e análises diretamente pelo Rstudio. Por isso foi utilizado o Power Query, filtrando apenas os anos 2020-2023 e ajeitando a coluna Date. A base também apresenta uma grande quantidade de informações, podendo realizar diversas análises com o que se tem, porém é necessário fazer boas escolhas para mostrar dados relevantes. Por fim, foi possível realizar uma boa análise com os dados e expor como está a situação de Chicago em relação aos crimes relatados a polícia nos últimos anos.