Site icon R-bloggers

U.S. Avalanche Fatalities – A History and Breakdown in R

[This article was first published on Stoltzman Consulting Data Analytics Blog - Stoltzman Consulting, and kindly contributed to R-bloggers]. (You can report issue about the content on this page here)
Want to share your content on R-bloggers? click here if you have a blog, or here if you don't.

Each winter season, avalanches pose a serious threat to those who adventure in mountainous regions. An avalanche is defined as a mass of snow sliding, flowing, or tumbling down an inclined surface, typically destroying everything in its path. This post showcases the history of various activities that contribute to the total avalanche deaths that occur in the United States every year.

 Data – CAIC

The Colorado Avalanche Information Center (CAIC) collected data on avalanches from 1951 to 2020. The dataset includes a date, setting, state, primary activity, and number of deaths for each avalanche event that resulted in at least one death. When it comes to date, year and avalanche year are included. Avalanche years go with winter seasons, where avalanches later in the year are considered to be in the next avalanche year. For example, an avalanche that occurred on 12-22-2018 would be in avalanche year 2019. Avalanche year was chosen for this exploration. There are 24 unique primary activities in the dataset. I grouped similar primary activities into categories to prevent over plotting. 

Observations

The following code shows how the winter activities were grouped:

avalanche <- avalanche %>%
  mutate(activity_group = case_when(
    primary_activity %in% c("Backcountry Tourer","Hybrid Tourer", "Hybrid Rider", "Sidecountry Rider") ~ "Backcountry Skier",
    primary_activity %in% c("Hiker", "Hunter", "Snowplayer", "Human-powered Guide Client", "Resident") ~ "Hiker",
    primary_activity %in% c("Snowmobiler", "Snow Biker", "Motorized", "Mechanized Guide", "Machanized Guiding Client") ~ "Snowmobiler/Motorized",
    primary_activity %in% "Climber" ~ "Climber",
    primary_activity %in% c("Inbounds Rider", "Ski Patroller") ~ "Inbounds",
    primary_activity %in% c("Rescuer", "Ranger", "Others at Work", "Highway Personnel") ~ "Worker",
    TRUE ~ "Other"
))

Additional geographical visualizations are provided below. 

By states: 


Comparing East Coast to West Coast: 

There are many possibilities with this dataset and we are excited to explore it further. Stay tuned for more interesting finds. For more information on this dataset, check out: avalanche.state.co.us/accidents/statistics-and-reporting/

To leave a comment for the author, please follow the link and comment on their blog: Stoltzman Consulting Data Analytics Blog - Stoltzman Consulting.

R-bloggers.com offers daily e-mail updates about R news and tutorials about learning R and many other topics. Click here if you're looking to post or find an R/data-science job.
Want to share your content on R-bloggers? click here if you have a blog, or here if you don't.