library(ggplot2)
library(dplyr)
## Warning: package 'dplyr' was built under R version 3.4.4
##
## Attaching package: 'dplyr'
## The following objects are masked from 'package:stats':
##
## filter, lag
## The following objects are masked from 'package:base':
##
## intersect, setdiff, setequal, union
data("USArrests")
state_name_to_abbrev <- data.frame(
abbrev = state.abb,
name = state.name
)
head(USArrests)
## Murder Assault…