library(readxl)
setwd("C:/Users/Usuario/Downloads")
datos <- read_excel("database.xlsx")
## Warning: Expecting numeric in C2189 / R2189C3: got 'Accident Year'
## Warning: Expecting numeric in C2215 / R2215C3: got 'Accident Year'
# ===============================
#   VARIABLE: ACCIDENT COUNTY
# ===============================

# Extraer la variable correcta
accident_county <- datos$`Accident County`

# Tablas
tabla_freq_county <- table(accident_county)
View(tabla_freq_county)

tabla_rel_county <- prop.table(tabla_freq_county)
View(tabla_rel_county)

tabla_porcent_county <- prop.table(tabla_freq_county) * 100
View(tabla_porcent_county)

# Unir en un solo data frame
tabla_completa_county <- data.frame(
  Accident_County = names(tabla_freq_county),
  Frecuencia = as.vector(tabla_freq_county),
  Frec_Relativa = round(as.vector(tabla_rel_county), 4),
  Porcentaje = round(as.vector(tabla_porcent_county), 2)
)

View(tabla_completa_county)
tabla_completa_county
##                   Accident_County Frecuencia Frec_Relativa Porcentaje
## 1                          ACADIA          2        0.0007       0.07
## 2                   ACADIA PARISH          1        0.0004       0.04
## 3                             ADA          1        0.0004       0.04
## 4                           ADAIR          1        0.0004       0.04
## 5                           ADAMS          8        0.0029       0.29
## 6                    ADAMS COUNTY          1        0.0004       0.04
## 7                         ALAMEDA          1        0.0004       0.04
## 8                         ALFALFA          2        0.0007       0.07
## 9                           ALLEN         21        0.0077       0.77
## 10                          AMITE          1        0.0004       0.04
## 11                   AMITE COUNTY          1        0.0004       0.04
## 12                       ANDERSON          7        0.0026       0.26
## 13                         ANDREW          1        0.0004       0.04
## 14                        ANDREWS          6        0.0022       0.22
## 15                       ANGELINA          6        0.0022       0.22
## 16                       ANGELINE          1        0.0004       0.04
## 17                          ANOKA          1        0.0004       0.04
## 18                       ARAPAHOE          1        0.0004       0.04
## 19                         ARCHER          9        0.0033       0.33
## 20                  ARCHER COUNTY          3        0.0011       0.11
## 21                         ARENAC          1        0.0004       0.04
## 22                      ARMSTRONG          1        0.0004       0.04
## 23                      ASCENSION          5        0.0018       0.18
## 24                     ASSUMPTION          3        0.0011       0.11
## 25                      ASUMPTION          1        0.0004       0.04
## 26                         AUSTIN          4        0.0015       0.15
## 27                 BALTIMORE CITY          1        0.0004       0.04
## 28                        BANNOCK          1        0.0004       0.04
## 29                         BARBER          1        0.0004       0.04
## 30                         BARNES          1        0.0004       0.04
## 31                         BARTON          3        0.0011       0.11
## 32                         BAYLOR          1        0.0004       0.04
## 33                         BEADLE          3        0.0011       0.11
## 34                         BEAVER          5        0.0018       0.18
## 35                  BEAVER COUNTY          3        0.0011       0.11
## 36                            BEE          3        0.0011       0.11
## 37                           BELL          2        0.0007       0.07
## 38                         BENSON          3        0.0011       0.11
## 39                         BENTON          2        0.0007       0.07
## 40                          BERKS          3        0.0011       0.11
## 41                          BEXAR          3        0.0011       0.11
## 42                       BIG HORN          4        0.0015       0.15
## 43                        BIGHORN          1        0.0004       0.04
## 44                       BILLINGS          2        0.0007       0.07
## 45                         BLAINE          1        0.0004       0.04
## 46                          BLAIR          2        0.0007       0.07
## 47                     BLUE EARTH          3        0.0011       0.11
## 48                           BOND          2        0.0007       0.07
## 49                          BOONE          6        0.0022       0.22
## 50                         BOSQUE          1        0.0004       0.04
## 51                      BOTTINEAU          1        0.0004       0.04
## 52                      BOX ELDER          1        0.0004       0.04
## 53                           BOYD          1        0.0004       0.04
## 54                       BRAZORIA         29        0.0107       1.07
## 55                         BRAZOS          2        0.0007       0.07
## 56                         BROOKE          1        0.0004       0.04
## 57                       BROOKLYN          1        0.0004       0.04
## 58                         BROOME          1        0.0004       0.04
## 59                          BROWN          4        0.0015       0.15
## 60                          BRYAN          2        0.0007       0.07
## 61                       BUCHANAN          1        0.0004       0.04
## 62                        BULLITT          1        0.0004       0.04
## 63                          BURKE          1        0.0004       0.04
## 64                     BURLINGTON          1        0.0004       0.04
## 65                           BURT          3        0.0011       0.11
## 66                         BUTLER         17        0.0063       0.62
## 67                  BUTLER COUNTY          1        0.0004       0.04
## 68                       CABARRUS          2        0.0007       0.07
## 69                          CADDO          1        0.0004       0.04
## 70                      CALCASIEU         20        0.0074       0.74
## 71               CALCASIEU PARISH          2        0.0007       0.07
## 72                       CALCSIEU          1        0.0004       0.04
## 73                        CALHOUN          5        0.0018       0.18
## 74                        CAMBRIA          1        0.0004       0.04
## 75                        CAMERON          1        0.0004       0.04
## 76                       CAMPBELL          2        0.0007       0.07
## 77                       CANADIAN          2        0.0007       0.07
## 78                         CARBON          5        0.0018       0.18
## 79                  CARBON COUNTY          1        0.0004       0.04
## 80                       CAROLINE          2        0.0007       0.07
## 81                        CARROLL          7        0.0026       0.26
## 82                         CARSON          1        0.0004       0.04
## 83                  CARSON COUNTY          1        0.0004       0.04
## 84                         CARTER         15        0.0055       0.55
## 85                        CASCADE          3        0.0011       0.11
## 86                           CASS          7        0.0026       0.26
## 87                    CATTARAUGUS          1        0.0004       0.04
## 88                         CAYUGA          2        0.0007       0.07
## 89                          CEDAR          1        0.0004       0.04
## 90                   CEDAR COUNTY          1        0.0004       0.04
## 91                    CERRO GORDO          2        0.0007       0.07
## 92                       CHAMBERS         29        0.0107       1.07
## 93                CHAMBERS COUNTY          2        0.0007       0.07
## 94                      CHAMPAIGN          1        0.0004       0.04
## 95                       CHARITON          3        0.0011       0.11
## 96                      CHARLOTTE          1        0.0004       0.04
## 97                     CHAUTAUQUA          1        0.0004       0.04
## 98                         CHAVES          2        0.0007       0.07
## 99                         CHAVEZ          1        0.0004       0.04
## 100                      CHEROKEE          1        0.0004       0.04
## 101                       CHESTER          2        0.0007       0.07
## 102                  CHESTERFIELD          1        0.0004       0.04
## 103                      CHEYENNE          2        0.0007       0.07
## 104                     CHILDRESS          2        0.0007       0.07
## 105                     CHRISTIAN          3        0.0011       0.11
## 106               CIMARRON COUNTY          1        0.0004       0.04
## 107                     CLAIBORNE          2        0.0007       0.07
## 108                         CLARK          8        0.0029       0.29
## 109                        CLARKE          1        0.0004       0.04
## 110                          CLAY          4        0.0015       0.15
## 111                    CLEARWATER         12        0.0044       0.44
## 112                      CLEBURNE          1        0.0004       0.04
## 113                     CLEVELAND          2        0.0007       0.07
## 114                       CLINTON          2        0.0007       0.07
## 115                         CLOUD          2        0.0007       0.07
## 116                          COBB          8        0.0029       0.29
## 117                       COCHRAN          1        0.0004       0.04
## 118                          COKE          1        0.0004       0.04
## 119                         COLES          1        0.0004       0.04
## 120                        COLLIN          1        0.0004       0.04
## 121                        COLORA          1        0.0004       0.04
## 122                      COLORADO          5        0.0018       0.18
## 123                      COLUMBIA          1        0.0004       0.04
## 124                    COLUMBIANA          1        0.0004       0.04
## 125                      COMANCHE          1        0.0004       0.04
## 126                     CONCORDIA          1        0.0004       0.04
## 127                  CONTRA COSTA         14        0.0051       0.51
## 128                      CONVERSE          4        0.0015       0.15
## 129                          COOK         11        0.0040       0.40
## 130                        COPIAH          2        0.0007       0.07
## 131                       CORYELL          1        0.0004       0.04
## 132                        COTTLE          1        0.0004       0.04
## 133                        COTTON          2        0.0007       0.07
## 134                     COVINGTON          7        0.0026       0.26
## 135                        COWDEN          1        0.0004       0.04
## 136                        COWLEY          4        0.0015       0.15
## 137                     COWLEY CO          1        0.0004       0.04
## 138                         CRANE          8        0.0029       0.29
## 139                         CREEK          4        0.0015       0.15
## 140                  CREEK COUNTY          1        0.0004       0.04
## 141                      CROCKETT          2        0.0007       0.07
## 142                       CROWLEY          1        0.0004       0.04
## 143                     CULBERSON          5        0.0018       0.18
## 144                    CULBERTSON          1        0.0004       0.04
## 145                     CULVERSON          1        0.0004       0.04
## 146                    CUMBERLAND          6        0.0022       0.22
## 147                      CUYAHOGA          2        0.0007       0.07
## 148                        DAKOTA          4        0.0015       0.15
## 149                 DAKOTA COUNTY          1        0.0004       0.04
## 150                        DALLAM          2        0.0007       0.07
## 151                      DAVIDSON          1        0.0004       0.04
## 152                       DAVIESS          1        0.0004       0.04
## 153                         DAVIS          2        0.0007       0.07
## 154                        DAWSON          2        0.0007       0.07
## 155                 DAWSON COUNTY          1        0.0004       0.04
## 156                      DELAWARE         17        0.0063       0.62
## 157               DELAWARE COUNTY          1        0.0004       0.04
## 158                      DELAWARW          1        0.0004       0.04
## 159                      DELEWARE          1        0.0004       0.04
## 160               DELEWARE COUNTY          1        0.0004       0.04
## 161                        DEWITT          3        0.0011       0.11
## 162                     DICKINSON          4        0.0015       0.15
## 163                        DIMMIT          3        0.0011       0.11
## 164                        DIVIDE          1        0.0004       0.04
## 165                      DONIPHAN          1        0.0004       0.04
## 166                       DOUGLAS         22        0.0081       0.81
## 167                      DUCHESNE          1        0.0004       0.04
## 168               DUCHESNE COUNTY          1        0.0004       0.04
## 169                         DUNDY          2        0.0007       0.07
## 170                          DUNN          1        0.0004       0.04
## 171                        DUPAGE          1        0.0004       0.04
## 172              EAST BATON ROUGE         11        0.0040       0.40
## 173       EAST BATON ROUGE PARISH          2        0.0007       0.07
## 174                 EAST FELICIAN          1        0.0004       0.04
## 175                EAST FELICIANA         18        0.0066       0.66
## 176                      EASTLAND          6        0.0022       0.22
## 177                    EAU CLAIRE          1        0.0004       0.04
## 178                         ECTOR         19        0.0070       0.70
## 179                          EDDY          8        0.0029       0.29
## 180                   EDDY COUNTY          4        0.0015       0.15
## 181                         EDGAR          1        0.0004       0.04
## 182                     EDGEFIELD          2        0.0007       0.07
## 183                       EDWARDS          1        0.0004       0.04
## 184                     EFFINGHAM          2        0.0007       0.07
## 185                       EL PASO          4        0.0015       0.15
## 186                       ELKHART          1        0.0004       0.04
## 187                         ELLIS          9        0.0033       0.33
## 188                         EMMET          1        0.0004       0.04
## 189                          ERIE          1        0.0004       0.04
## 190  FAIRBANKS NORTH STAR BOROUGH          1        0.0004       0.04
## 191                       FAIRFAX          4        0.0015       0.15
## 192                        FALLON          1        0.0004       0.04
## 193                        FANNIN          3        0.0011       0.11
## 194                     FARIBAULT          1        0.0004       0.04
## 195                      FAULKNER          1        0.0004       0.04
## 196                      FAUQUIER          1        0.0004       0.04
## 197                       FAYETTE          6        0.0022       0.22
## 198                      FILLMORE          2        0.0007       0.07
## 199               FILLMORE COUNTY          3        0.0011       0.11
## 200                          FORD          2        0.0007       0.07
## 201                     FORT BEND          3        0.0011       0.11
## 202                      FORTBEND          1        0.0004       0.04
## 203                      FRANKLIN          4        0.0015       0.15
## 204                      FREESTON          1        0.0004       0.04
## 205                     FREESTONE          9        0.0033       0.33
## 206                       FREMONT          3        0.0011       0.11
## 207                        FRESNO          2        0.0007       0.07
## 208                          GAGE          1        0.0004       0.04
## 209                        GAINES         14        0.0051       0.51
## 210                 GAINES COUNTY          2        0.0007       0.07
## 211                    GALVESTION          1        0.0004       0.04
## 212                     GALVESTON         22        0.0081       0.81
## 213              GALVESTON COUNTY          1        0.0004       0.04
## 214                      GARFIELD          6        0.0022       0.22
## 215                        GARVIN          8        0.0029       0.29
## 216                     GASCONADE          1        0.0004       0.04
## 217                        GIBSON          3        0.0011       0.11
## 218                       GLACIER          1        0.0004       0.04
## 219                     GLASSCOCK          2        0.0007       0.07
## 220                    GLOUCESTER          4        0.0015       0.15
## 221                       GOGEBIC          1        0.0004       0.04
## 222                      GONZALES          1        0.0004       0.04
## 223                      GONZALEZ          1        0.0004       0.04
## 224                     GOOCHLAND          1        0.0004       0.04
## 225                        GOSHEN          4        0.0015       0.15
## 226                 GOSHEN COUNTY          1        0.0004       0.04
## 227                         GRADY          6        0.0022       0.22
## 228                        GRAHAM          2        0.0007       0.07
## 229                   GRAND FORKS          1        0.0004       0.04
## 230                         GRANT         10        0.0037       0.37
## 231                  GRANT COUNTY          1        0.0004       0.04
## 232                          GRAY          1        0.0004       0.04
## 233                       GRAYSON          5        0.0018       0.18
## 234                        GREENE          1        0.0004       0.04
## 235                    GREENVILLE          1        0.0004       0.04
## 236                     GREENWOOD          3        0.0011       0.11
## 237                         GREGG         27        0.0099       0.99
## 238          GREGG  COUNTY, TEXAS          1        0.0004       0.04
## 239                        GRIMES          4        0.0015       0.15
## 240                        GRUNDY          2        0.0007       0.07
## 241                     GUADALUPE          2        0.0007       0.07
## 242                      GUILFORD         10        0.0037       0.37
## 243                      GWINNETT          2        0.0007       0.07
## 244                          HALE          2        0.0007       0.07
## 245                      HAMILTON          3        0.0011       0.11
## 246                       HAMPDEN          2        0.0007       0.07
## 247                       HANCOCK          2        0.0007       0.07
## 248                HANCOCK COUNTY          1        0.0004       0.04
## 249                        HANSEN          1        0.0004       0.04
## 250                      HARALSON          1        0.0004       0.04
## 251                        HARDIN         14        0.0051       0.51
## 252                 HARDIN COUNTY          1        0.0004       0.04
## 253                       HARFORD          1        0.0004       0.04
## 254                        HARPER          5        0.0018       0.18
## 255                        HARRIS        168        0.0618       6.18
## 256                 HARRIS COUNTY          2        0.0007       0.07
## 257                      HARRISON          3        0.0011       0.11
## 258                        HARVEY          1        0.0004       0.04
## 259                       HASKELL          3        0.0011       0.11
## 260                HAYWOOD COUNTY          1        0.0004       0.04
## 261            HEMPFIELD TOWNSHIP          1        0.0004       0.04
## 262                     HENDRICKS          1        0.0004       0.04
## 263                         HENRY          1        0.0004       0.04
## 264                          HILL          3        0.0011       0.11
## 265                   HILL COUNTY          1        0.0004       0.04
## 266                  HILLSBOROUGH          2        0.0007       0.07
## 267                       HOCKLEY          4        0.0015       0.15
## 268                HOCKLEY COUNTY          1        0.0004       0.04
## 269        HOCKLEY COUNTY (RURAL)          1        0.0004       0.04
## 270                      HODGEMAN          1        0.0004       0.04
## 271                 HOLMES COUNTY          1        0.0004       0.04
## 272                      HONOLULU          3        0.0011       0.11
## 273                       HOUSTON          1        0.0004       0.04
## 274                        HOWARD          8        0.0029       0.29
## 275                       HUBBARD          3        0.0011       0.11
## 276                        HUDSON          8        0.0029       0.29
## 277                      HUDSPETH          1        0.0004       0.04
## 278                      HUMBOLDT          5        0.0018       0.18
## 279                     HUMPHREYS          3        0.0011       0.11
## 280                          HUNT          5        0.0018       0.18
## 281                    HUNTINGTON          2        0.0007       0.07
## 282                         HURON          2        0.0007       0.07
## 283                    HUTCHINSON          7        0.0026       0.26
## 284                     IBERVILLE          4        0.0015       0.15
## 285              IBERVILLE PARISH          1        0.0004       0.04
## 286                           IDA          1        0.0004       0.04
## 287                        INGHAM          1        0.0004       0.04
## 288                          IOWA          2        0.0007       0.07
## 289                     ISSAQUENA          4        0.0015       0.15
## 290                        ITASCA         10        0.0037       0.37
## 291                          JACK          5        0.0018       0.18
## 292                       JACKSON         11        0.0040       0.40
## 293                    JAMES CITY          2        0.0007       0.07
## 294                        JASPER          8        0.0029       0.29
## 295                           JAY          2        0.0007       0.07
## 296                    JEFF DAVIS          1        0.0004       0.04
## 297                     JEFFERSON        106        0.0390       3.90
## 298              JEFFERSON COUNTY          1        0.0004       0.04
## 299               JEFFERSON DAVIS          6        0.0022       0.22
## 300                       JOHNSON         12        0.0044       0.44
## 301                      JOHNSTON          2        0.0007       0.07
## 302                         JONES          5        0.0018       0.18
## 303                  JUDITH BASIN          1        0.0004       0.04
## 304                      KALKASKA          2        0.0007       0.07
## 305                          KANE          2        0.0007       0.07
## 306                      KANKAKEE          4        0.0015       0.15
## 307                        KARNES          4        0.0015       0.15
## 308                 KARNES COUNTY          1        0.0004       0.04
## 309                       KAUFMAN          1        0.0004       0.04
## 310                           KAY          5        0.0018       0.18
## 311                          KERN         41        0.0151       1.51
## 312                   KERN COUNTY          1        0.0004       0.04
## 313                       KIMBALL          1        0.0004       0.04
## 314                          KING          1        0.0004       0.04
## 315                    KINGFISHER          3        0.0011       0.11
## 316                       KINGMAN          6        0.0022       0.22
## 317                         KINGS          1        0.0004       0.04
## 318                         KIOWA          5        0.0018       0.18
## 319                    KIT CARSON          1        0.0004       0.04
## 320                       KLEBURG          1        0.0004       0.04
## 321                          KNOX          1        0.0004       0.04
## 322                            LA          1        0.0004       0.04
## 323                      LA PLATA          1        0.0004       0.04
## 324                      LA SALLE          8        0.0029       0.29
## 325                       LACLEDE          1        0.0004       0.04
## 326                     LAFOURCHE         10        0.0037       0.37
## 327                          LAKE         30        0.0110       1.10
## 328                     LANCASTER          1        0.0004       0.04
## 329                        LAPEER          1        0.0004       0.04
## 330                       LARAMIE          6        0.0022       0.22
## 331                        LARNED          1        0.0004       0.04
## 332                    LAUDERDALE          2        0.0007       0.07
## 333                       LAURENS          1        0.0004       0.04
## 334                        LAVACA          6        0.0022       0.22
## 335                      LAWRENCE          3        0.0011       0.11
## 336                           LEA         26        0.0096       0.96
## 337                    LEA COUNTY          1        0.0004       0.04
## 338            LEAVENWORTH COUNTY          1        0.0004       0.04
## 339                           LEE          3        0.0011       0.11
## 340                    LEE COUNTY          1        0.0004       0.04
## 341                        LEHIGH          6        0.0022       0.22
## 342                      LENNAWEE          1        0.0004       0.04
## 343                          LEON          1        0.0004       0.04
## 344                       LIBERTY         13        0.0048       0.48
## 345                LIBERTY COUNTY          2        0.0007       0.07
## 346                       LINCOLN         36        0.0132       1.32
## 347                          LINN          2        0.0007       0.07
## 348                      LIVE OAK          6        0.0022       0.22
## 349                    LIVINGSTON          7        0.0026       0.26
## 350                         LOGAN          4        0.0015       0.15
## 351                  LOGAN COUNTY          1        0.0004       0.04
## 352                        LORAIN          1        0.0004       0.04
## 353                       LORRAIN          1        0.0004       0.04
## 354                   LOS ANGELES         53        0.0195       1.95
## 355            LOS ANGELES COUNTY          4        0.0015       0.15
## 356                        LOUDON          1        0.0004       0.04
## 357                   LOVE COUNTY          1        0.0004       0.04
## 358                        LOVING          6        0.0022       0.22
## 359                         LUCAS         10        0.0037       0.37
## 360                      LYCOMING          1        0.0004       0.04
## 361                          LYON          1        0.0004       0.04
## 362                         MACON          4        0.0015       0.15
## 363                       MADISON         13        0.0048       0.48
## 364                       MALHEUR          1        0.0004       0.04
## 365                        MARION         15        0.0055       0.55
## 366                      MARSHALL          1        0.0004       0.04
## 367                        MARTIN          8        0.0029       0.29
## 368               MARYSVILLE CITY          1        0.0004       0.04
## 369                         MASON          1        0.0004       0.04
## 370                     MATAGORDA          1        0.0004       0.04
## 371                       MCCLAIN          2        0.0007       0.07
## 372                     MCCORMICK          1        0.0004       0.04
## 373                      MCDUFFIE          1        0.0004       0.04
## 374                      MCKENZIE         13        0.0048       0.48
## 375                      MCKINLEY          2        0.0007       0.07
## 376                      MCLENNAN          2        0.0007       0.07
## 377                      MCMULLEN          3        0.0011       0.11
## 378                     MCPHERSON         17        0.0063       0.62
## 379              MCPHERSON COUNTY          1        0.0004       0.04
## 380                         MEADE          1        0.0004       0.04
## 381                   MECKLENBURG          1        0.0004       0.04
## 382                         MIAMI          1        0.0004       0.04
## 383                     MIDDLESEX         45        0.0165       1.65
## 384              MIDDLESEX COUNTY          1        0.0004       0.04
## 385                       MIDLAND         50        0.0184       1.84
## 386                     MILWAUKEE          3        0.0011       0.11
## 387                         MINER          1        0.0004       0.04
## 388                     MINNEHAHA          2        0.0007       0.07
## 389                      MITCHELL          2        0.0007       0.07
## 390                        MOBILE          3        0.0011       0.11
## 391                        MONONA          3        0.0011       0.11
## 392                        MONROE          9        0.0033       0.33
## 393                      MONTAGUE          8        0.0029       0.29
## 394                      MONTAQUE          1        0.0004       0.04
## 395                     MONTEZUMA          1        0.0004       0.04
## 396                    MONTGOMERY         15        0.0055       0.55
## 397                         MOORE          1        0.0004       0.04
## 398                        MORRIS          1        0.0004       0.04
## 399                        MORROW          1        0.0004       0.04
## 400                        MORTON          1        0.0004       0.04
## 401                     MOUNTRAIL          2        0.0007       0.07
## 402                     MULTNOMAH          3        0.0011       0.11
## 403                        MURRAY          1        0.0004       0.04
## 404                   NACOGDOCHES          2        0.0007       0.07
## 405                      NARVARRO          1        0.0004       0.04
## 406                       NATRONA          9        0.0033       0.33
## 407                       NAVARRO         28        0.0103       1.03
## 408                        NELSON          1        0.0004       0.04
## 409                         NEMAH          1        0.0004       0.04
## 410                        NEMAHA          2        0.0007       0.07
## 411                          NESS          1        0.0004       0.04
## 412                     NEW HAVEN          1        0.0004       0.04
## 413                        NEWTON          2        0.0007       0.07
## 414                      NIOBRARA          2        0.0007       0.07
## 415               NIOBRARA COUNTY          3        0.0011       0.11
## 416      NIOBRARA COUNTY, WYOMING          1        0.0004       0.04
## 417                         NOBLE          3        0.0011       0.11
## 418                         NOLAN          3        0.0011       0.11
## 419           NORTH SLOPE BOROUGH          3        0.0011       0.11
## 420                NORTHUMBERLAND          1        0.0004       0.04
## 421 Not Within a County or Parish          6        0.0022       0.22
## 422                        NUECES         19        0.0070       0.70
## 423                        OASAGE          1        0.0004       0.04
## 424                    OCHILLTREE          1        0.0004       0.04
## 425                     OCHILTREE          2        0.0007       0.07
## 426              OCHILTREE COUNTY          1        0.0004       0.04
## 427                      OKFUSKEE          1        0.0004       0.04
## 428                      OKLAHOMA          7        0.0026       0.26
## 429                      OKMULGEE          1        0.0004       0.04
## 430                      ONONGADA          1        0.0004       0.04
## 431                        ORANGE         11        0.0040       0.40
## 432                       ORLEANS          1        0.0004       0.04
## 433                         OSAGE          7        0.0026       0.26
## 434                         OTERO          3        0.0011       0.11
## 435                          OTOE          1        0.0004       0.04
## 436                        OTTAWA          2        0.0007       0.07
## 437                            PA          1        0.0004       0.04
## 438                    PALO PINTO          3        0.0011       0.11
## 439                        PANOLA          2        0.0007       0.07
## 440                          PARK          1        0.0004       0.04
## 441                         PARKE          3        0.0011       0.11
## 442                        PAWNEE          1        0.0004       0.04
## 443                         PAYNE         51        0.0187       1.88
## 444                  PAYNE COUNTY          1        0.0004       0.04
## 445                         PECOS          2        0.0007       0.07
## 446                       PEMBINA          1        0.0004       0.04
## 447                         PERRY          1        0.0004       0.04
## 448                        PETTIS          2        0.0007       0.07
## 449                  PHILADELPHIA          1        0.0004       0.04
## 450                        PIERCE          2        0.0007       0.07
## 451                      PINELLAS          1        0.0004       0.04
## 452                        PLACER          3        0.0011       0.11
## 453                   PLAQUAMINES          1        0.0004       0.04
## 454                    PLAQUEMINE          1        0.0004       0.04
## 455                   PLAQUEMINES          8        0.0029       0.29
## 456            PLAQUEMINES PARISH          2        0.0007       0.07
## 457                         PLATT          1        0.0004       0.04
## 458                        PLATTE          6        0.0022       0.22
## 459                    POCAHONTAS          1        0.0004       0.04
## 460                 POINTE COUPEE          1        0.0004       0.04
## 461                POINTEE COUPEE          1        0.0004       0.04
## 462                          POLK         13        0.0048       0.48
## 463                       PORTAGE          1        0.0004       0.04
## 464                        PORTER          1        0.0004       0.04
## 465                         POSEY          2        0.0007       0.07
## 466                  POTTAWATAMIE          1        0.0004       0.04
## 467                  POTTAWATOMIE          1        0.0004       0.04
## 468                        POTTER          4        0.0015       0.15
## 469                       PRAIRIE          1        0.0004       0.04
## 470                         PRATT          1        0.0004       0.04
## 471                       PULASKI          2        0.0007       0.07
## 472                        QUEENS          1        0.0004       0.04
## 473                        RAMSEY          1        0.0004       0.04
## 474                      RANDOLPH          1        0.0004       0.04
## 475                        RANSOM          3        0.0011       0.11
## 476                      RAWLINGS          1        0.0004       0.04
## 477                        REAGAN          2        0.0007       0.07
## 478                      RED LAKE          1        0.0004       0.04
## 479                        REEVES          7        0.0026       0.26
## 480                       REFUGIO          2        0.0007       0.07
## 481                REFUGIO COUNTY          1        0.0004       0.04
## 482                          RENO          2        0.0007       0.07
## 483                   RENO COUNTY          2        0.0007       0.07
## 484                      RENVILLE          2        0.0007       0.07
## 485                          RICE          5        0.0018       0.18
## 486                   RICE COUNTY          1        0.0004       0.04
## 487                      RICHLAND          2        0.0007       0.07
## 488               RICHLAND COUNTY          1        0.0004       0.04
## 489                      RICHMOND          2        0.0007       0.07
## 490             RIO ARRIBA COUNTY          1        0.0004       0.04
## 491                        RIPLEY          1        0.0004       0.04
## 492                     ROBERTSON          3        0.0011       0.11
## 493                   ROCK ISLAND          1        0.0004       0.04
## 494                         ROOKS          1        0.0004       0.04
## 495                       ROSEBUD          1        0.0004       0.04
## 496                          RUSK          3        0.0011       0.11
## 497                        SABINE          1        0.0004       0.04
## 498                           SAC          1        0.0004       0.04
## 499                    SACRAMENTO          1        0.0004       0.04
## 500                       SAGINAW          1        0.0004       0.04
## 501                 SAINT BERNARD          1        0.0004       0.04
## 502                   SAINT JAMES          4        0.0015       0.15
## 503                        SALINE          3        0.0011       0.11
## 504                     SALT LAKE          3        0.0011       0.11
## 505                SAN BERNARDINO          7        0.0026       0.26
## 506                     SAN DIEGO          1        0.0004       0.04
## 507                   SAN JACINTO          1        0.0004       0.04
## 508                   SAN JOAQUIN          3        0.0011       0.11
## 509                      SAN JUAN          5        0.0018       0.18
## 510               SAN JUAN COUNTY          1        0.0004       0.04
## 511               SAN LUIS OBISPO          1        0.0004       0.04
## 512                     SAN MATEO          1        0.0004       0.04
## 513                  SAN PATRICIO          7        0.0026       0.26
## 514                   SAN PATRICO          1        0.0004       0.04
## 515                       SANDERS          1        0.0004       0.04
## 516                      SANDOVAL          1        0.0004       0.04
## 517               SANDOVAL COUNTY          1        0.0004       0.04
## 518                 SANTA BARBARA          6        0.0022       0.22
## 519                    SANTA ROSA          1        0.0004       0.04
## 520                       SARGENT          1        0.0004       0.04
## 521                     SCHOHARIE          1        0.0004       0.04
## 522                   SCHOOLCRAFT          1        0.0004       0.04
## 523                      SCHUYLER          1        0.0004       0.04
## 524                      SCOTLAND          1        0.0004       0.04
## 525                         SCOTT          3        0.0011       0.11
## 526                  SCOTT COUNTY          1        0.0004       0.04
## 527                        SCURRY         30        0.0110       1.10
## 528                      SEDGWICK          4        0.0015       0.15
## 529                      SEMINOLE          2        0.0007       0.07
## 530                        SENECA          1        0.0004       0.04
## 531                        SEWARD          1        0.0004       0.04
## 532                       SHARKEY          1        0.0004       0.04
## 533                SHARKEY COUNTY          1        0.0004       0.04
## 534                       SHAWNEE          1        0.0004       0.04
## 535                        SHELBY         10        0.0037       0.37
## 536                      SHERIDAN          2        0.0007       0.07
## 537                       SIMPSON          1        0.0004       0.04
## 538                        SKAGIT          3        0.0011       0.11
## 539                         SMITH          2        0.0007       0.07
## 540                        SOLANO          2        0.0007       0.07
## 541                      SOMERSET          1        0.0004       0.04
## 542                   SPARTANBURG          3        0.0011       0.11
## 543                       SPOKANE          2        0.0007       0.07
## 544                  SPOTSYLVANIA          1        0.0004       0.04
## 545                      ST JAMES          1        0.0004       0.04
## 546                     ST LANDRY          1        0.0004       0.04
## 547                ST MARY PARISH          1        0.0004       0.04
## 548                   ST. CHARLES          8        0.0029       0.29
## 549                     ST. CLAIR          4        0.0015       0.15
## 550                    ST. HELENA          2        0.0007       0.07
## 551                     ST. JAMES         16        0.0059       0.59
## 552                    ST. JOSEPH          1        0.0004       0.04
## 553                    ST. LANDRY          2        0.0007       0.07
## 554                     ST. LOUIS          3        0.0011       0.11
## 555                    ST. MARTIN          1        0.0004       0.04
## 556                      ST. MARY          1        0.0004       0.04
## 557                      STAFFORD          5        0.0018       0.18
## 558                         STARK          5        0.0018       0.18
## 559                         STARR          1        0.0004       0.04
## 560                       STEARNS          2        0.0007       0.07
## 561                      STEPHENS          9        0.0033       0.33
## 562               STERLING COUNTY          1        0.0004       0.04
## 563                       STEVENS          1        0.0004       0.04
## 564                     STONEWALL          1        0.0004       0.04
## 565                      SULLIVAN          2        0.0007       0.07
## 566                        SUMNER          2        0.0007       0.07
## 567                        SUMTER          1        0.0004       0.04
## 568                        SUTTER          1        0.0004       0.04
## 569                        SUTTON          2        0.0007       0.07
## 570                    SWEETWATER          5        0.0018       0.18
## 571                     TALLADEGA          1        0.0004       0.04
## 572                       TARRANT          1        0.0004       0.04
## 573                        TAYLOR          5        0.0018       0.18
## 574                    TERREBONNE          1        0.0004       0.04
## 575                         TERRY          1        0.0004       0.04
## 576                         TEXAS          1        0.0004       0.04
## 577                        THAYER          1        0.0004       0.04
## 578                  THROCKMORTON          1        0.0004       0.04
## 579                        TIPTON          1        0.0004       0.04
## 580                 TIPTON COUNTY          1        0.0004       0.04
## 581                      TORRANCE          1        0.0004       0.04
## 582                      TRAVERSE          1        0.0004       0.04
## 583                        TRAVIS          1        0.0004       0.04
## 584                         TREGO          3        0.0011       0.11
## 585                         TULSA         16        0.0059       0.59
## 586                    TWIN FALLS          1        0.0004       0.04
## 587                         TYLER          7        0.0026       0.26
## 588                         UINTA          6        0.0022       0.22
## 589                         UNION         29        0.0107       1.07
## 590                  UNION COUNTY          1        0.0004       0.04
## 591                  UNION PARISH          1        0.0004       0.04
## 592                         UPTON         13        0.0048       0.48
## 593                     VAN BUREN          1        0.0004       0.04
## 594                     VAN ZANDT          1        0.0004       0.04
## 595                       VENTURA          2        0.0007       0.07
## 596                VENTURA COUNTY          1        0.0004       0.04
## 597                     VERMILION          1        0.0004       0.04
## 598                      VICTORIA          3        0.0011       0.11
## 599                 WABASH COUNTY          1        0.0004       0.04
## 600                       WAGONER          1        0.0004       0.04
## 601                        WALKER          7        0.0026       0.26
## 602                       WALLACE          3        0.0011       0.11
## 603                      WALWORTH          2        0.0007       0.07
## 604                          WARD          5        0.0018       0.18
## 605                        WARREN          6        0.0022       0.22
## 606                      WASHAKIE          2        0.0007       0.07
## 607                    WASHINGTON         11        0.0040       0.40
## 608                     WASHINTON          2        0.0007       0.07
## 609                         WAYNE          8        0.0029       0.29
## 610                          WELD          8        0.0029       0.29
## 611              WEST BATON ROUGE          6        0.0022       0.22
## 612                        WESTON         14        0.0051       0.51
## 613                 WESTON COUNTY          8        0.0029       0.29
## 614        WESTON COUNTY, WYOMING          4        0.0015       0.15
## 615                        WETZEL          1        0.0004       0.04
## 616                       WHARTON          4        0.0015       0.15
## 617                       WHATCOM          1        0.0004       0.04
## 618                       WHEELER          1        0.0004       0.04
## 619                         WHITE          1        0.0004       0.04
## 620                     WHITESIDE          2        0.0007       0.07
## 621                       WICHITA         12        0.0044       0.44
## 622                 WICHITA FALLS          2        0.0007       0.07
## 623          WICHITA FALLS COUNTY          1        0.0004       0.04
## 624                      WILBAGER          1        0.0004       0.04
## 625                        WILKIN          1        0.0004       0.04
## 626                          WILL         19        0.0070       0.70
## 627                      WILLIAMS          5        0.0018       0.18
## 628               WILLIAMS COUNTY          1        0.0004       0.04
## 629                    WILLIAMSON          3        0.0011       0.11
## 630             WILLIAMSON COUNTY          1        0.0004       0.04
## 631                        WILSON          1        0.0004       0.04
## 632                       WINKLER          9        0.0033       0.33
## 633                     WINNEBAGO          1        0.0004       0.04
## 634                          WISE          3        0.0011       0.11
## 635                          WOOD          4        0.0015       0.15
## 636                      WOODBURY          2        0.0007       0.07
## 637                      WOODRUFF          1        0.0004       0.04
## 638                      WOODWARD          2        0.0007       0.07
## 639                            WY          1        0.0004       0.04
## 640                     WYANDOTTE         11        0.0040       0.40
## 641                   YELLOWSTONE          6        0.0022       0.22
## 642                        YOAKUM         10        0.0037       0.37
## 643                          YOLO          1        0.0004       0.04
## 644                          YORK          1        0.0004       0.04
## 645                         YOUNG          4        0.0015       0.15
library(ggplot2)

ggplot(data.frame(
  Accident_County = names(tabla_freq_county),
  Frecuencia = as.vector(tabla_freq_county)),
  aes(x = Accident_County, y = Frecuencia)) +
  geom_bar(stat = "identity", fill = "steelblue") +
  labs(title = "Frecuencia de Accident County",
       x = "Condado",
       y = "Frecuencia") +
  theme_minimal()

tabla_segunda_county <- data.frame(
  Accident_County = names(tabla_rel_county),
  Frec_Relativa = as.vector(tabla_rel_county)
)

ggplot(tabla_segunda_county,
       aes(x = Accident_County, y = Frec_Relativa)) +
  geom_bar(stat = "identity", fill = "lightgreen") +
  labs(title = "Frecuencia Relativa de Accident County",
       x = "Condado",
       y = "Frecuencia Relativa") +
  theme_minimal()

tabla_por_county <- data.frame(
  Accident_County = names(tabla_porcent_county),
  Porcentaje = as.vector(tabla_porcent_county)
)

ggplot(tabla_por_county,
       aes(x = Accident_County, y = Porcentaje)) +
  geom_bar(stat = "identity", fill = "orange") +
  labs(title = "Porcentaje de Accident County",
       x = "Condado",
       y = "Porcentaje (%)") +
  theme_minimal()