Firearms Sourced and Recovered in the United States and Territories 2016
Shinyapp that uses leaflets to visualize direction of firearms flow between states.
Choose a state in the drop down menu to the left and the direction of flow
R users - please deploy from R console as to not deplete the account on shinyapps.io. Thank you!
pkgs <- c('reshape2','geojson','readxl','ggplot2',
'leaflet','httr','rgeolocate','shiny','sp','dplyr')
check <- sapply(pkgs,require,warn.conflicts = TRUE,character.only = TRUE)
if(any(!check)){
pkgs.missing <- pkgs[!check]
install.packages(pkgs.missing)
check <- sapply(pkgs.missing,require,warn.conflicts = TRUE,character.only = TRUE)
}
shiny::runGitHub('yonicd/gunflow')