In this report we aim to highlight the most dangerous storm events in the United states. Out of a database of 902297 events spreading over 60 years, we summarize the fatalities, injuries and property damages by event type.
Basis for the analysis is a dataset about storms in the Unites states. More information can be found in this documentation and the corresponding label). In this section, we load the dataset from a remote source and present some statistics.
dataUrl <- "https://d396qusza40orc.cloudfront.net/repdata%2Fdata%2FStormData.csv.bz2"
dataDir <- tempdir()
dataArchive <- file.path(dataDir, "StormData.csv.bz2")
download.file(url = dataUrl, destfile = dataArchive)
storms <- read.csv(dataArchive)
The dataset contains the following columns.
names(storms)
## [1] "STATE__" "BGN_DATE" "BGN_TIME" "TIME_ZONE" "COUNTY"
## [6] "COUNTYNAME" "STATE" "EVTYPE" "BGN_RANGE" "BGN_AZI"
## [11] "BGN_LOCATI" "END_DATE" "END_TIME" "COUNTY_END" "COUNTYENDN"
## [16] "END_RANGE" "END_AZI" "END_LOCATI" "LENGTH" "WIDTH"
## [21] "F" "MAG" "FATALITIES" "INJURIES" "PROPDMG"
## [26] "PROPDMGEXP" "CROPDMG" "CROPDMGEXP" "WFO" "STATEOFFIC"
## [31] "ZONENAMES" "LATITUDE" "LONGITUDE" "LATITUDE_E" "LONGITUDE_"
## [36] "REMARKS" "REFNUM"
library("lubridate")
##
## Attaching package: 'lubridate'
## The following object is masked from 'package:base':
##
## date
begin_daterange <- range(ymd(parse_date_time(storms$BGN_DATE, "m/d/y h:m:s")))
# not all storms have an end date, so remove the empty values first
end_daterange <- range(ymd(parse_date_time(unique(storms$END_DATE[storms$END_DATE != ""]), "m/d/y h:m:s")))
The dataset contains data from 1950-01-03 to 2011-11-30.
In this section, two questions about the impact of storms on population health and economic consequences are investigated.
Across the United States, which types of events (as indicated in the EVTYPE variable) are most harmful with respect to population health?
What are the types of events in the database?
summary(storms$EVTYPE)
## HAIL TSTM WIND THUNDERSTORM WIND
## 288661 219940 82563
## TORNADO FLASH FLOOD FLOOD
## 60652 54277 25326
## THUNDERSTORM WINDS HIGH WIND LIGHTNING
## 20843 20212 15754
## HEAVY SNOW HEAVY RAIN WINTER STORM
## 15708 11723 11433
## WINTER WEATHER FUNNEL CLOUD MARINE TSTM WIND
## 7026 6839 6175
## MARINE THUNDERSTORM WIND WATERSPOUT STRONG WIND
## 5812 3796 3566
## URBAN/SML STREAM FLD WILDFIRE BLIZZARD
## 3392 2761 2719
## DROUGHT ICE STORM EXCESSIVE HEAT
## 2488 2006 1678
## HIGH WINDS WILD/FOREST FIRE FROST/FREEZE
## 1533 1457 1342
## DENSE FOG WINTER WEATHER/MIX TSTM WIND/HAIL
## 1293 1104 1028
## EXTREME COLD/WIND CHILL HEAT HIGH SURF
## 1002 767 725
## TROPICAL STORM FLASH FLOODING EXTREME COLD
## 690 682 655
## COASTAL FLOOD LAKE-EFFECT SNOW FLOOD/FLASH FLOOD
## 650 636 624
## LANDSLIDE SNOW COLD/WIND CHILL
## 600 587 539
## FOG RIP CURRENT MARINE HAIL
## 538 470 442
## DUST STORM AVALANCHE WIND
## 427 386 340
## RIP CURRENTS STORM SURGE FREEZING RAIN
## 304 261 250
## URBAN FLOOD HEAVY SURF/HIGH SURF EXTREME WINDCHILL
## 249 228 204
## STRONG WINDS DRY MICROBURST ASTRONOMICAL LOW TIDE
## 196 186 174
## HURRICANE RIVER FLOOD LIGHT SNOW
## 174 173 154
## STORM SURGE/TIDE RECORD WARMTH COASTAL FLOODING
## 148 146 143
## DUST DEVIL MARINE HIGH WIND UNSEASONABLY WARM
## 141 135 126
## FLOODING ASTRONOMICAL HIGH TIDE MODERATE SNOWFALL
## 120 103 101
## URBAN FLOODING WINTRY MIX HURRICANE/TYPHOON
## 98 90 88
## FUNNEL CLOUDS HEAVY SURF RECORD HEAT
## 87 84 81
## FREEZE HEAT WAVE COLD
## 74 74 72
## RECORD COLD ICE THUNDERSTORM WINDS HAIL
## 64 61 61
## TROPICAL DEPRESSION SLEET UNSEASONABLY DRY
## 60 59 56
## FROST GUSTY WINDS THUNDERSTORM WINDSS
## 53 53 51
## MARINE STRONG WIND OTHER SMALL HAIL
## 48 48 47
## FUNNEL FREEZING FOG THUNDERSTORM
## 46 45 45
## Temperature record TSTM WIND (G45) Coastal Flooding
## 43 39 38
## WATERSPOUTS MONTHLY PRECIPITATION WINDS
## 37 36 36
## (Other)
## 2940
levels(storms$EVTYPE)
## [1] "?" "ABNORMALLY DRY"
## [3] "ABNORMALLY WET" "ABNORMAL WARMTH"
## [5] "ACCUMULATED SNOWFALL" "AGRICULTURAL FREEZE"
## [7] "APACHE COUNTY" "ASTRONOMICAL HIGH TIDE"
## [9] "ASTRONOMICAL LOW TIDE" "AVALANCE"
## [11] "AVALANCHE" "BEACH EROSIN"
## [13] "Beach Erosion" "BEACH EROSION"
## [15] "BEACH EROSION/COASTAL FLOOD" "BEACH FLOOD"
## [17] "BELOW NORMAL PRECIPITATION" "BITTER WIND CHILL"
## [19] "BITTER WIND CHILL TEMPERATURES" "Black Ice"
## [21] "BLACK ICE" "BLIZZARD"
## [23] "BLIZZARD AND EXTREME WIND CHIL" "BLIZZARD AND HEAVY SNOW"
## [25] "BLIZZARD/FREEZING RAIN" "BLIZZARD/HEAVY SNOW"
## [27] "BLIZZARD/HIGH WIND" "Blizzard Summary"
## [29] "BLIZZARD WEATHER" "BLIZZARD/WINTER STORM"
## [31] "BLOWING DUST" "blowing snow"
## [33] "Blowing Snow" "BLOWING SNOW"
## [35] "BLOWING SNOW & EXTREME WIND CH" "BLOWING SNOW- EXTREME WIND CHI"
## [37] "BLOWING SNOW/EXTREME WIND CHIL" "BLOW-OUT TIDE"
## [39] "BLOW-OUT TIDES" "BREAKUP FLOODING"
## [41] "BRUSH FIRE" "BRUSH FIRES"
## [43] "COASTAL EROSION" "Coastal Flood"
## [45] "COASTALFLOOD" " COASTAL FLOOD"
## [47] "COASTAL FLOOD" "coastal flooding"
## [49] "Coastal Flooding" "COASTAL FLOODING"
## [51] "COASTAL FLOODING/EROSION" "COASTAL FLOODING/EROSION"
## [53] "Coastal Storm" "COASTALSTORM"
## [55] "COASTAL STORM" "COASTAL SURGE"
## [57] "COASTAL/TIDAL FLOOD" "Cold"
## [59] "COLD" "COLD AIR FUNNEL"
## [61] "COLD AIR FUNNELS" "COLD AIR TORNADO"
## [63] "Cold and Frost" "COLD AND FROST"
## [65] "COLD AND SNOW" "COLD AND WET CONDITIONS"
## [67] "Cold Temperature" "COLD TEMPERATURES"
## [69] "COLD WAVE" "COLD WEATHER"
## [71] "COLD/WIND CHILL" "COLD WIND CHILL TEMPERATURES"
## [73] "COLD/WINDS" "COOL AND WET"
## [75] "COOL SPELL" "CSTL FLOODING/EROSION"
## [77] "Damaging Freeze" "DAMAGING FREEZE"
## [79] "DAM BREAK" "DAM FAILURE"
## [81] "DEEP HAIL" "DENSE FOG"
## [83] "DENSE SMOKE" "DOWNBURST"
## [85] "DOWNBURST WINDS" "DRIEST MONTH"
## [87] "Drifting Snow" "DROUGHT"
## [89] "DROUGHT/EXCESSIVE HEAT" "DROWNING"
## [91] "DRY" "DRY CONDITIONS"
## [93] "DRY HOT WEATHER" "DRY MICROBURST"
## [95] "DRY MICROBURST 50" "DRY MICROBURST 53"
## [97] "DRY MICROBURST 58" "DRY MICROBURST 61"
## [99] "DRY MICROBURST 84" "DRY MICROBURST WINDS"
## [101] "DRY MIRCOBURST WINDS" "DRYNESS"
## [103] "DRY PATTERN" "DRY SPELL"
## [105] "DRY WEATHER" "DUST DEVEL"
## [107] "Dust Devil" "DUST DEVIL"
## [109] "DUST DEVIL WATERSPOUT" "DUSTSTORM"
## [111] "DUST STORM" "DUST STORM/HIGH WINDS"
## [113] "EARLY FREEZE" "Early Frost"
## [115] "EARLY FROST" "EARLY RAIN"
## [117] "EARLY SNOW" "Early snowfall"
## [119] "EARLY SNOWFALL" "Erosion/Cstl Flood"
## [121] "EXCESSIVE" "Excessive Cold"
## [123] "EXCESSIVE HEAT" "EXCESSIVE HEAT/DROUGHT"
## [125] "EXCESSIVELY DRY" "EXCESSIVE PRECIPITATION"
## [127] "EXCESSIVE RAIN" "EXCESSIVE RAINFALL"
## [129] "EXCESSIVE SNOW" "EXCESSIVE WETNESS"
## [131] "Extended Cold" "Extreme Cold"
## [133] "EXTREME COLD" "EXTREME COLD/WIND CHILL"
## [135] "EXTREME HEAT" "EXTREMELY WET"
## [137] "EXTREME/RECORD COLD" "EXTREME WINDCHILL"
## [139] "EXTREME WIND CHILL" "EXTREME WIND CHILL/BLOWING SNO"
## [141] "EXTREME WIND CHILLS" "EXTREME WINDCHILL TEMPERATURES"
## [143] "FALLING SNOW/ICE" "FIRST FROST"
## [145] "FIRST SNOW" " FLASH FLOOD"
## [147] "FLASH FLOOD" "FLASH FLOOD/"
## [149] "FLASH FLOOD/FLOOD" "FLASH FLOOD/ FLOOD"
## [151] "FLASH FLOOD FROM ICE JAMS" "FLASH FLOOD - HEAVY RAIN"
## [153] "FLASH FLOOD/HEAVY RAIN" "FLASH FLOODING"
## [155] "FLASH FLOODING/FLOOD" "FLASH FLOODING/THUNDERSTORM WI"
## [157] "FLASH FLOOD/LANDSLIDE" "FLASH FLOOD LANDSLIDES"
## [159] "FLASH FLOODS" "FLASH FLOOD/ STREET"
## [161] "FLASH FLOOD WINDS" "FLASH FLOOODING"
## [163] "Flood" "FLOOD"
## [165] "FLOOD FLASH" "FLOOD/FLASH"
## [167] "Flood/Flash Flood" "FLOOD/FLASHFLOOD"
## [169] "FLOOD/FLASH FLOOD" "FLOOD/FLASH/FLOOD"
## [171] "FLOOD/FLASH FLOODING" "FLOOD FLOOD/FLASH"
## [173] "FLOOD & HEAVY RAIN" "FLOODING"
## [175] "FLOODING/HEAVY RAIN" "FLOOD/RAIN/WIND"
## [177] "FLOOD/RAIN/WINDS" "FLOOD/RIVER FLOOD"
## [179] "FLOODS" "Flood/Strong Wind"
## [181] "FLOOD WATCH/" "FOG"
## [183] "FOG AND COLD TEMPERATURES" "FOREST FIRES"
## [185] "Freeze" "FREEZE"
## [187] "Freezing drizzle" "Freezing Drizzle"
## [189] "FREEZING DRIZZLE" "FREEZING DRIZZLE AND FREEZING"
## [191] "Freezing Fog" "FREEZING FOG"
## [193] "Freezing rain" "Freezing Rain"
## [195] "FREEZING RAIN" "FREEZING RAIN AND SLEET"
## [197] "FREEZING RAIN AND SNOW" "FREEZING RAIN/SLEET"
## [199] "FREEZING RAIN SLEET AND" "FREEZING RAIN SLEET AND LIGHT"
## [201] "FREEZING RAIN/SNOW" "Freezing Spray"
## [203] "Frost" "FROST"
## [205] "Frost/Freeze" "FROST/FREEZE"
## [207] "FROST\\FREEZE" "FUNNEL"
## [209] "Funnel Cloud" "FUNNEL CLOUD"
## [211] "FUNNEL CLOUD." "FUNNEL CLOUD/HAIL"
## [213] "FUNNEL CLOUDS" "FUNNELS"
## [215] "Glaze" "GLAZE"
## [217] "GLAZE ICE" "GLAZE/ICE STORM"
## [219] "gradient wind" "Gradient wind"
## [221] "GRADIENT WIND" "GRADIENT WINDS"
## [223] "GRASS FIRES" "GROUND BLIZZARD"
## [225] "GUSTNADO" "GUSTNADO AND"
## [227] "GUSTY LAKE WIND" "GUSTY THUNDERSTORM WIND"
## [229] "GUSTY THUNDERSTORM WINDS" "Gusty Wind"
## [231] "GUSTY WIND" "GUSTY WIND/HAIL"
## [233] "GUSTY WIND/HVY RAIN" "Gusty wind/rain"
## [235] "Gusty winds" "Gusty Winds"
## [237] "GUSTY WINDS" "HAIL"
## [239] "Hail(0.75)" "HAIL 075"
## [241] "HAIL 0.75" "HAIL 088"
## [243] "HAIL 0.88" "HAIL 100"
## [245] "HAIL 1.00" "HAIL 125"
## [247] "HAIL 150" "HAIL 175"
## [249] "HAIL 1.75" "HAIL 1.75)"
## [251] "HAIL 200" "HAIL 225"
## [253] "HAIL 275" "HAIL 450"
## [255] "HAIL 75" "HAIL 80"
## [257] "HAIL 88" "HAIL ALOFT"
## [259] "HAIL DAMAGE" "HAIL FLOODING"
## [261] "HAIL/ICY ROADS" "HAILSTORM"
## [263] "HAIL STORM" "HAILSTORMS"
## [265] "HAIL/WIND" "HAIL/WINDS"
## [267] "HARD FREEZE" "HAZARDOUS SURF"
## [269] "HEAT" "Heatburst"
## [271] "HEAT DROUGHT" "HEAT/DROUGHT"
## [273] "Heat Wave" "HEAT WAVE"
## [275] "HEAT WAVE DROUGHT" "HEAT WAVES"
## [277] "HEAVY LAKE SNOW" "HEAVY MIX"
## [279] "HEAVY PRECIPATATION" "Heavy Precipitation"
## [281] "HEAVY PRECIPITATION" "Heavy rain"
## [283] "Heavy Rain" "HEAVY RAIN"
## [285] "HEAVY RAIN AND FLOOD" "Heavy Rain and Wind"
## [287] "HEAVY RAIN EFFECTS" "HEAVY RAINFALL"
## [289] "HEAVY RAIN/FLOODING" "Heavy Rain/High Surf"
## [291] "HEAVY RAIN/LIGHTNING" "HEAVY RAIN/MUDSLIDES/FLOOD"
## [293] "HEAVY RAINS" "HEAVY RAIN/SEVERE WEATHER"
## [295] "HEAVY RAINS/FLOODING" "HEAVY RAIN/SMALL STREAM URBAN"
## [297] "HEAVY RAIN/SNOW" "HEAVY RAIN/URBAN FLOOD"
## [299] "HEAVY RAIN; URBAN FLOOD WINDS;" "HEAVY RAIN/WIND"
## [301] "HEAVY SEAS" "HEAVY SHOWER"
## [303] "HEAVY SHOWERS" "HEAVY SNOW"
## [305] "HEAVY SNOW AND" "HEAVY SNOW ANDBLOWING SNOW"
## [307] "HEAVY SNOW AND HIGH WINDS" "HEAVY SNOW AND ICE"
## [309] "HEAVY SNOW AND ICE STORM" "HEAVY SNOW AND STRONG WINDS"
## [311] "HEAVY SNOW/BLIZZARD" "HEAVY SNOW/BLIZZARD/AVALANCHE"
## [313] "HEAVY SNOW/BLOWING SNOW" "HEAVY SNOW FREEZING RAIN"
## [315] "HEAVY SNOW/FREEZING RAIN" "HEAVY SNOW/HIGH"
## [317] "HEAVY SNOW/HIGH WIND" "HEAVY SNOW/HIGH WINDS"
## [319] "HEAVY SNOW/HIGH WINDS & FLOOD" "HEAVY SNOW/HIGH WINDS/FREEZING"
## [321] "HEAVY SNOW & ICE" "HEAVY SNOW/ICE"
## [323] "HEAVY SNOW/ICE STORM" "HEAVY SNOWPACK"
## [325] "Heavy snow shower" "HEAVY SNOW/SLEET"
## [327] "HEAVY SNOW SQUALLS" "HEAVY SNOW-SQUALLS"
## [329] "HEAVY SNOW/SQUALLS" "HEAVY SNOW/WIND"
## [331] "HEAVY SNOW/WINTER STORM" "Heavy Surf"
## [333] "HEAVY SURF" "Heavy surf and wind"
## [335] "HEAVY SURF COASTAL FLOODING" "HEAVY SURF/HIGH SURF"
## [337] "HEAVY SWELLS" "HEAVY WET SNOW"
## [339] "HIGH" "HIGH SEAS"
## [341] "High Surf" "HIGH SURF"
## [343] "HIGH SURF ADVISORIES" " HIGH SURF ADVISORY"
## [345] "HIGH SURF ADVISORY" "HIGH SWELLS"
## [347] "HIGH SWELLS" "HIGH TEMPERATURE RECORD"
## [349] "HIGH TIDES" "HIGH WATER"
## [351] "HIGH WAVES" "HIGHWAY FLOODING"
## [353] "High Wind" "HIGH WIND"
## [355] "HIGH WIND 48" "HIGH WIND 63"
## [357] "HIGH WIND 70" "HIGH WIND AND HEAVY SNOW"
## [359] "HIGH WIND AND HIGH TIDES" "HIGH WIND AND SEAS"
## [361] "HIGH WIND/BLIZZARD" "HIGH WIND/ BLIZZARD"
## [363] "HIGH WIND/BLIZZARD/FREEZING RA" "HIGH WIND DAMAGE"
## [365] "HIGH WIND (G40)" "HIGH WIND/HEAVY SNOW"
## [367] "HIGH WIND/LOW WIND CHILL" "HIGH WINDS"
## [369] "HIGH WINDS" "HIGH WINDS/"
## [371] "HIGH WINDS 55" "HIGH WINDS 57"
## [373] "HIGH WINDS 58" "HIGH WINDS 63"
## [375] "HIGH WINDS 66" "HIGH WINDS 67"
## [377] "HIGH WINDS 73" "HIGH WINDS 76"
## [379] "HIGH WINDS 80" "HIGH WINDS 82"
## [381] "HIGH WINDS AND WIND CHILL" "HIGH WINDS/COASTAL FLOOD"
## [383] "HIGH WINDS/COLD" "HIGH WINDS DUST STORM"
## [385] "HIGH WIND/SEAS" "HIGH WINDS/FLOODING"
## [387] "HIGH WINDS/HEAVY RAIN" "HIGH WINDS HEAVY RAINS"
## [389] "HIGH WINDS/SNOW" "HIGH WIND/WIND CHILL"
## [391] "HIGH WIND/WIND CHILL/BLIZZARD" "Hot and Dry"
## [393] "HOT/DRY PATTERN" "HOT PATTERN"
## [395] "HOT SPELL" "HOT WEATHER"
## [397] "HURRICANE" "Hurricane Edouard"
## [399] "HURRICANE EMILY" "HURRICANE ERIN"
## [401] "HURRICANE FELIX" "HURRICANE-GENERATED SWELLS"
## [403] "HURRICANE GORDON" "HURRICANE OPAL"
## [405] "HURRICANE OPAL/HIGH WINDS" "HURRICANE/TYPHOON"
## [407] "HVY RAIN" "HYPERTHERMIA/EXPOSURE"
## [409] "HYPOTHERMIA" "Hypothermia/Exposure"
## [411] "HYPOTHERMIA/EXPOSURE" "ICE"
## [413] "ICE AND SNOW" "ICE FLOES"
## [415] "Ice Fog" "ICE JAM"
## [417] "ICE JAM FLOODING" "Ice jam flood (minor"
## [419] "ICE ON ROAD" "ICE PELLETS"
## [421] "ICE ROADS" "Ice/Snow"
## [423] "ICE/SNOW" "ICE STORM"
## [425] "ICE STORM AND SNOW" "Icestorm/Blizzard"
## [427] "ICE STORM/FLASH FLOOD" "ICE/STRONG WINDS"
## [429] "Icy Roads" "ICY ROADS"
## [431] "LACK OF SNOW" "Lake Effect Snow"
## [433] "LAKE EFFECT SNOW" "LAKE-EFFECT SNOW"
## [435] "LAKE FLOOD" "LAKESHORE FLOOD"
## [437] "LANDSLIDE" "LANDSLIDES"
## [439] "LANDSLIDE/URBAN FLOOD" "Landslump"
## [441] "LANDSLUMP" "LANDSPOUT"
## [443] "LARGE WALL CLOUD" "LATE FREEZE"
## [445] "LATE SEASON HAIL" "LATE SEASON SNOW"
## [447] "Late-season Snowfall" "Late Season Snowfall"
## [449] "LATE SNOW" "LIGHT FREEZING RAIN"
## [451] "LIGHTING" "LIGHTNING"
## [453] " LIGHTNING" "LIGHTNING."
## [455] "LIGHTNING AND HEAVY RAIN" "LIGHTNING AND THUNDERSTORM WIN"
## [457] "LIGHTNING AND WINDS" "LIGHTNING DAMAGE"
## [459] "LIGHTNING FIRE" "LIGHTNING/HEAVY RAIN"
## [461] "LIGHTNING INJURY" "LIGHTNING THUNDERSTORM WINDS"
## [463] "LIGHTNING THUNDERSTORM WINDSS" "LIGHTNING WAUSEON"
## [465] "Light snow" "Light Snow"
## [467] "LIGHT SNOW" "LIGHT SNOW AND SLEET"
## [469] "Light Snowfall" "Light Snow/Flurries"
## [471] "LIGHT SNOW/FREEZING PRECIP" "LIGNTNING"
## [473] "LOCAL FLASH FLOOD" "LOCAL FLOOD"
## [475] "LOCALLY HEAVY RAIN" "LOW TEMPERATURE"
## [477] "LOW TEMPERATURE RECORD" "LOW WIND CHILL"
## [479] "MAJOR FLOOD" "Marine Accident"
## [481] "MARINE HAIL" "MARINE HIGH WIND"
## [483] "MARINE MISHAP" "MARINE STRONG WIND"
## [485] "MARINE THUNDERSTORM WIND" "MARINE TSTM WIND"
## [487] "Metro Storm, May 26" "Microburst"
## [489] "MICROBURST" "MICROBURST WINDS"
## [491] "Mild and Dry Pattern" "MILD/DRY PATTERN"
## [493] "MILD PATTERN" "MINOR FLOOD"
## [495] "Minor Flooding" "MINOR FLOODING"
## [497] "MIXED PRECIP" "Mixed Precipitation"
## [499] "MIXED PRECIPITATION" "MODERATE SNOW"
## [501] "MODERATE SNOWFALL" "MONTHLY PRECIPITATION"
## [503] "Monthly Rainfall" "MONTHLY RAINFALL"
## [505] "Monthly Snowfall" "MONTHLY SNOWFALL"
## [507] "MONTHLY TEMPERATURE" "Mountain Snows"
## [509] "MUD/ROCK SLIDE" "Mudslide"
## [511] "MUDSLIDE" "MUD SLIDE"
## [513] "MUDSLIDE/LANDSLIDE" "Mudslides"
## [515] "MUDSLIDES" "MUD SLIDES"
## [517] "MUD SLIDES URBAN FLOODING" "NEAR RECORD SNOW"
## [519] "NONE" "NON SEVERE HAIL"
## [521] "NON-SEVERE WIND DAMAGE" "NON TSTM WIND"
## [523] "NON-TSTM WIND" "NORMAL PRECIPITATION"
## [525] "NORTHERN LIGHTS" "No Severe Weather"
## [527] "Other" "OTHER"
## [529] "PATCHY DENSE FOG" "PATCHY ICE"
## [531] "Prolong Cold" "PROLONG COLD"
## [533] "PROLONG COLD/SNOW" "PROLONGED RAIN"
## [535] "PROLONG WARMTH" "RAIN"
## [537] "RAIN AND WIND" "Rain Damage"
## [539] "RAIN (HEAVY)" "RAIN/SNOW"
## [541] "RAINSTORM" "RAIN/WIND"
## [543] "RAPIDLY RISING WATER" "Record Cold"
## [545] "RECORD COLD" "RECORD COLD"
## [547] "RECORD COLD AND HIGH WIND" "RECORD COLD/FROST"
## [549] "RECORD COOL" "Record dry month"
## [551] "RECORD DRYNESS" "RECORD/EXCESSIVE HEAT"
## [553] "RECORD/EXCESSIVE RAINFALL" "Record Heat"
## [555] "RECORD HEAT" "RECORD HEAT WAVE"
## [557] "Record High" "RECORD HIGH"
## [559] "RECORD HIGH TEMPERATURE" "RECORD HIGH TEMPERATURES"
## [561] "RECORD LOW" "RECORD LOW RAINFALL"
## [563] "Record May Snow" "RECORD PRECIPITATION"
## [565] "RECORD RAINFALL" "RECORD SNOW"
## [567] "RECORD SNOW/COLD" "RECORD SNOWFALL"
## [569] "Record temperature" "RECORD TEMPERATURE"
## [571] "Record Temperatures" "RECORD TEMPERATURES"
## [573] "RECORD WARM" "RECORD WARM TEMPS."
## [575] "Record Warmth" "RECORD WARMTH"
## [577] "Record Winter Snow" "RED FLAG CRITERIA"
## [579] "RED FLAG FIRE WX" "REMNANTS OF FLOYD"
## [581] "RIP CURRENT" "RIP CURRENTS"
## [583] "RIP CURRENTS HEAVY SURF" "RIP CURRENTS/HEAVY SURF"
## [585] "RIVER AND STREAM FLOOD" "RIVER FLOOD"
## [587] "River Flooding" "RIVER FLOODING"
## [589] "ROCK SLIDE" "ROGUE WAVE"
## [591] "ROTATING WALL CLOUD" "ROUGH SEAS"
## [593] "ROUGH SURF" "RURAL FLOOD"
## [595] "Saharan Dust" "SAHARAN DUST"
## [597] "Seasonal Snowfall" "SEICHE"
## [599] "SEVERE COLD" "SEVERE THUNDERSTORM"
## [601] "SEVERE THUNDERSTORMS" "SEVERE THUNDERSTORM WINDS"
## [603] "SEVERE TURBULENCE" "SLEET"
## [605] "SLEET & FREEZING RAIN" "SLEET/FREEZING RAIN"
## [607] "SLEET/ICE STORM" "SLEET/RAIN/SNOW"
## [609] "SLEET/SNOW" "SLEET STORM"
## [611] "small hail" "Small Hail"
## [613] "SMALL HAIL" "SMALL STREAM"
## [615] "SMALL STREAM AND" "SMALL STREAM AND URBAN FLOOD"
## [617] "SMALL STREAM AND URBAN FLOODIN" "SMALL STREAM FLOOD"
## [619] "SMALL STREAM FLOODING" "SMALL STREAM URBAN FLOOD"
## [621] "SMALL STREAM/URBAN FLOOD" "Sml Stream Fld"
## [623] "SMOKE" "Snow"
## [625] "SNOW" "Snow Accumulation"
## [627] "SNOW ACCUMULATION" "SNOW ADVISORY"
## [629] "SNOW AND COLD" "SNOW AND HEAVY SNOW"
## [631] "Snow and Ice" "SNOW AND ICE"
## [633] "SNOW AND ICE STORM" "Snow and sleet"
## [635] "SNOW AND SLEET" "SNOW AND WIND"
## [637] "SNOW/ BITTER COLD" "SNOW/BLOWING SNOW"
## [639] "SNOW/COLD" "SNOW\\COLD"
## [641] "SNOW DROUGHT" "SNOWFALL RECORD"
## [643] "SNOW FREEZING RAIN" "SNOW/FREEZING RAIN"
## [645] "SNOW/HEAVY SNOW" "SNOW/HIGH WINDS"
## [647] "SNOW- HIGH WIND- WIND CHILL" "SNOW/ICE"
## [649] "SNOW/ ICE" "SNOW/ICE STORM"
## [651] "SNOWMELT FLOODING" "SNOW/RAIN"
## [653] "SNOW/RAIN/SLEET" "SNOW SHOWERS"
## [655] "SNOW SLEET" "SNOW/SLEET"
## [657] "SNOW/SLEET/FREEZING RAIN" "SNOW/SLEET/RAIN"
## [659] "SNOW SQUALL" "Snow squalls"
## [661] "Snow Squalls" "SNOW SQUALLS"
## [663] "SNOWSTORM" "SOUTHEAST"
## [665] "STORM FORCE WINDS" "STORM SURGE"
## [667] "STORM SURGE/TIDE" "STREAM FLOODING"
## [669] "STREET FLOOD" "STREET FLOODING"
## [671] "Strong Wind" "STRONG WIND"
## [673] "STRONG WIND GUST" "Strong winds"
## [675] "Strong Winds" "STRONG WINDS"
## [677] "Summary August 10" "Summary August 11"
## [679] "Summary August 17" "Summary August 21"
## [681] "Summary August 2-3" "Summary August 28"
## [683] "Summary August 4" "Summary August 7"
## [685] "Summary August 9" "Summary Jan 17"
## [687] "Summary July 23-24" "Summary June 18-19"
## [689] "Summary June 5-6" "Summary June 6"
## [691] "Summary: Nov. 16" "Summary: Nov. 6-7"
## [693] "Summary: Oct. 20-21" "Summary: October 31"
## [695] "Summary of April 12" "Summary of April 13"
## [697] "Summary of April 21" "Summary of April 27"
## [699] "Summary of April 3rd" "Summary of August 1"
## [701] "Summary of July 11" "Summary of July 2"
## [703] "Summary of July 22" "Summary of July 26"
## [705] "Summary of July 29" "Summary of July 3"
## [707] "Summary of June 10" "Summary of June 11"
## [709] "Summary of June 12" "Summary of June 13"
## [711] "Summary of June 15" "Summary of June 16"
## [713] "Summary of June 18" "Summary of June 23"
## [715] "Summary of June 24" "Summary of June 3"
## [717] "Summary of June 30" "Summary of June 4"
## [719] "Summary of June 6" "Summary of March 14"
## [721] "Summary of March 23" "Summary of March 24"
## [723] "SUMMARY OF MARCH 24-25" "SUMMARY OF MARCH 27"
## [725] "SUMMARY OF MARCH 29" "Summary of May 10"
## [727] "Summary of May 13" "Summary of May 14"
## [729] "Summary of May 22" "Summary of May 22 am"
## [731] "Summary of May 22 pm" "Summary of May 26 am"
## [733] "Summary of May 26 pm" "Summary of May 31 am"
## [735] "Summary of May 31 pm" "Summary of May 9-10"
## [737] "Summary: Sept. 18" "Summary Sept. 25-26"
## [739] "Summary September 20" "Summary September 23"
## [741] "Summary September 3" "Summary September 4"
## [743] "Temperature record" "THUDERSTORM WINDS"
## [745] "THUNDEERSTORM WINDS" "THUNDERESTORM WINDS"
## [747] "THUNDERSNOW" "Thundersnow shower"
## [749] "THUNDERSTORM" "THUNDERSTORM DAMAGE"
## [751] "THUNDERSTORM DAMAGE TO" "THUNDERSTORM HAIL"
## [753] "THUNDERSTORMS" "THUNDERSTORMS WIND"
## [755] "THUNDERSTORMS WINDS" "THUNDERSTORMW"
## [757] "THUNDERSTORMW 50" "Thunderstorm Wind"
## [759] "THUNDERSTORM WIND" "THUNDERSTORM WIND."
## [761] "THUNDERSTORM WIND 50" "THUNDERSTORM WIND 52"
## [763] "THUNDERSTORM WIND 56" "THUNDERSTORM WIND 59"
## [765] "THUNDERSTORM WIND 59 MPH" "THUNDERSTORM WIND 59 MPH."
## [767] "THUNDERSTORM WIND 60 MPH" "THUNDERSTORM WIND 65MPH"
## [769] "THUNDERSTORM WIND 65 MPH" "THUNDERSTORM WIND 69"
## [771] "THUNDERSTORM WIND 98 MPH" "THUNDERSTORM WIND/AWNING"
## [773] "THUNDERSTORM WIND (G40)" "THUNDERSTORM WIND G50"
## [775] "THUNDERSTORM WIND G51" "THUNDERSTORM WIND G52"
## [777] "THUNDERSTORM WIND G55" "THUNDERSTORM WIND G60"
## [779] "THUNDERSTORM WIND G61" "THUNDERSTORM WIND/HAIL"
## [781] "THUNDERSTORM WIND/LIGHTNING" "THUNDERSTORMWINDS"
## [783] "THUNDERSTORM WINDS" "THUNDERSTORM WINDS"
## [785] "THUNDERSTORM W INDS" "THUNDERSTORM WINDS."
## [787] "THUNDERSTORM WINDS 13" "THUNDERSTORM WINDS 2"
## [789] "THUNDERSTORM WINDS 50" "THUNDERSTORM WINDS 52"
## [791] "THUNDERSTORM WINDS53" "THUNDERSTORM WINDS 53"
## [793] "THUNDERSTORM WINDS 60" "THUNDERSTORM WINDS 61"
## [795] "THUNDERSTORM WINDS 62" "THUNDERSTORM WINDS 63 MPH"
## [797] "THUNDERSTORM WINDS AND" "THUNDERSTORM WINDS/FLASH FLOOD"
## [799] "THUNDERSTORM WINDS/ FLOOD" "THUNDERSTORM WINDS/FLOODING"
## [801] "THUNDERSTORM WINDS FUNNEL CLOU" "THUNDERSTORM WINDS/FUNNEL CLOU"
## [803] "THUNDERSTORM WINDS G" "THUNDERSTORM WINDS G60"
## [805] "THUNDERSTORM WINDSHAIL" "THUNDERSTORM WINDS HAIL"
## [807] "THUNDERSTORM WINDS/HAIL" "THUNDERSTORM WINDS/ HAIL"
## [809] "THUNDERSTORM WINDS HEAVY RAIN" "THUNDERSTORM WINDS/HEAVY RAIN"
## [811] "THUNDERSTORM WINDS LE CEN" "THUNDERSTORM WINDS LIGHTNING"
## [813] "THUNDERSTORM WINDSS" "THUNDERSTORM WINDS SMALL STREA"
## [815] "THUNDERSTORM WINDS URBAN FLOOD" "THUNDERSTORM WIND/ TREE"
## [817] "THUNDERSTORM WIND TREES" "THUNDERSTORM WIND/ TREES"
## [819] "THUNDERSTORM WINS" "THUNDERSTORMW WINDS"
## [821] "THUNDERSTROM WIND" "THUNDERSTROM WINDS"
## [823] "THUNDERTORM WINDS" "THUNDERTSORM WIND"
## [825] "THUNDESTORM WINDS" "THUNERSTORM WINDS"
## [827] "TIDAL FLOOD" "Tidal Flooding"
## [829] "TIDAL FLOODING" "TORNADO"
## [831] "TORNADO DEBRIS" "TORNADOES"
## [833] "TORNADOES, TSTM WIND, HAIL" "TORNADO F0"
## [835] "TORNADO F1" "TORNADO F2"
## [837] "TORNADO F3" "TORNADOS"
## [839] "TORNADO/WATERSPOUT" "TORNDAO"
## [841] "TORRENTIAL RAIN" "Torrential Rainfall"
## [843] "TROPICAL DEPRESSION" "TROPICAL STORM"
## [845] "TROPICAL STORM ALBERTO" "TROPICAL STORM DEAN"
## [847] "TROPICAL STORM GORDON" "TROPICAL STORM JERRY"
## [849] "TSTM" "TSTM HEAVY RAIN"
## [851] "TSTMW" "Tstm Wind"
## [853] " TSTM WIND" "TSTM WIND"
## [855] "TSTM WIND 40" "TSTM WIND (41)"
## [857] "TSTM WIND 45" "TSTM WIND 50"
## [859] "TSTM WIND 51" "TSTM WIND 52"
## [861] "TSTM WIND 55" "TSTM WIND 65)"
## [863] "TSTM WIND AND LIGHTNING" "TSTM WIND DAMAGE"
## [865] "TSTM WIND (G35)" "TSTM WIND (G40)"
## [867] " TSTM WIND (G45)" "TSTM WIND G45"
## [869] "TSTM WIND (G45)" "TSTM WIND (G45)"
## [871] "TSTM WIND G58" "TSTM WIND/HAIL"
## [873] "TSTM WINDS" "TSTM WND"
## [875] "TSUNAMI" "TUNDERSTORM WIND"
## [877] "TYPHOON" "Unseasonable Cold"
## [879] "UNSEASONABLY COLD" "UNSEASONABLY COOL"
## [881] "UNSEASONABLY COOL & WET" "UNSEASONABLY DRY"
## [883] "UNSEASONABLY HOT" "UNSEASONABLY WARM"
## [885] "UNSEASONABLY WARM AND DRY" "UNSEASONABLY WARM & WET"
## [887] "UNSEASONABLY WARM/WET" "UNSEASONABLY WARM YEAR"
## [889] "UNSEASONABLY WET" "UNSEASONAL LOW TEMP"
## [891] "UNSEASONAL RAIN" "UNUSUALLY COLD"
## [893] "UNUSUALLY LATE SNOW" "UNUSUALLY WARM"
## [895] "UNUSUAL/RECORD WARMTH" "UNUSUAL WARMTH"
## [897] "URBAN AND SMALL" "URBAN AND SMALL STREAM"
## [899] "URBAN AND SMALL STREAM FLOOD" "URBAN AND SMALL STREAM FLOODIN"
## [901] "Urban flood" "Urban Flood"
## [903] "URBAN FLOOD" "Urban Flooding"
## [905] "URBAN FLOODING" "URBAN FLOOD LANDSLIDE"
## [907] "URBAN FLOODS" "URBAN SMALL"
## [909] "URBAN/SMALL" "URBAN/SMALL FLOODING"
## [911] "URBAN/SMALL STREAM" "URBAN SMALL STREAM FLOOD"
## [913] "URBAN/SMALL STREAM FLOOD" "URBAN/SMALL STREAM FLOOD"
## [915] "URBAN/SMALL STREAM FLOODING" "URBAN/SMALL STRM FLDG"
## [917] "URBAN/SML STREAM FLD" "URBAN/SML STREAM FLDG"
## [919] "URBAN/STREET FLOODING" "VERY DRY"
## [921] "VERY WARM" "VOG"
## [923] "Volcanic Ash" "VOLCANIC ASH"
## [925] "VOLCANIC ASHFALL" "Volcanic Ash Plume"
## [927] "VOLCANIC ERUPTION" "WAKE LOW WIND"
## [929] "WALL CLOUD" "WALL CLOUD/FUNNEL CLOUD"
## [931] "WARM DRY CONDITIONS" "WARM WEATHER"
## [933] "WATERSPOUT" " WATERSPOUT"
## [935] "WATER SPOUT" "WATERSPOUT-"
## [937] "WATERSPOUT/" "WATERSPOUT FUNNEL CLOUD"
## [939] "WATERSPOUTS" "WATERSPOUT TORNADO"
## [941] "WATERSPOUT-TORNADO" "WATERSPOUT/TORNADO"
## [943] "WATERSPOUT/ TORNADO" "WAYTERSPOUT"
## [945] "wet micoburst" "WET MICROBURST"
## [947] "Wet Month" "WET SNOW"
## [949] "WET WEATHER" "Wet Year"
## [951] "Whirlwind" "WHIRLWIND"
## [953] "WILDFIRE" "WILDFIRES"
## [955] "WILD FIRES" "WILD/FOREST FIRE"
## [957] "WILD/FOREST FIRES" "Wind"
## [959] "WIND" " WIND"
## [961] "WIND ADVISORY" "WIND AND WAVE"
## [963] "WIND CHILL" "WIND CHILL/HIGH WIND"
## [965] "Wind Damage" "WIND DAMAGE"
## [967] "WIND GUSTS" "WIND/HAIL"
## [969] "WINDS" "WIND STORM"
## [971] "WINTER MIX" "WINTER STORM"
## [973] "WINTER STORM/HIGH WIND" "WINTER STORM HIGH WINDS"
## [975] "WINTER STORM/HIGH WINDS" "WINTER STORMS"
## [977] "Winter Weather" "WINTER WEATHER"
## [979] "WINTER WEATHER MIX" "WINTER WEATHER/MIX"
## [981] "WINTERY MIX" "Wintry mix"
## [983] "Wintry Mix" "WINTRY MIX"
## [985] "WND"
What are the most harmful ones? The following plot shows the 20 types with the highest number of fatalities and the 20 types with the highest number of injuries.
library(dplyr, quietly = TRUE, warn.conflicts = FALSE)
storms_aggr_fatalities <- storms %>% group_by(EVTYPE) %>% summarise(FATALITIES = sum(FATALITIES), INJURIES = sum(INJURIES))
top20_fat <- head(storms_aggr_fatalities[order(storms_aggr_fatalities$FATALITIES, decreasing = TRUE),], n = 20)
top20_inj <- head(storms_aggr_fatalities[order(storms_aggr_fatalities$INJURIES, decreasing = TRUE),], n = 20)
par(mfrow=c(2,1)) # arrange plots in column
barplot(names.arg = top20_fat$EVTYPE, height = top20_fat$FATALITIES, las=2, main = "Number of fatalities")
barplot(names.arg = top20_fat$EVTYPE, height = top20_fat$INJURIES, las=2, main = "Number of injured")
Across the United States, which types of events have the greatest economic consequences?
storms_aggr_damages <- storms %>% group_by(EVTYPE) %>% summarise(PROPDMG = sum(PROPDMG))
# change column to millions of dollars (are 1000s before)
storms_aggr_damages$PROPDMG_MILDOL = round(storms_aggr_damages$PROPDMG/1000, digits = 2)
top20_dmg <- head(storms_aggr_damages[order(storms_aggr_damages$PROPDMG, decreasing = TRUE),], n = 20)
barplot(names.arg = top20_dmg$EVTYPE, height = top20_dmg$PROPDMG_MILDOL, las=2, main = "Property damage in million US $")
Tornados are by far the most dangerous events, with both the hights number of fatalities and injuries, in the case of the latter by an order of magnitude. They also are at the top in property damages.