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()