Visualize violent crime rates in US with choroplethr package

April 11, 2014
By

[This article was first published on My Life as a Mock Quant in English, 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.

Visualize violent crime rates in different US States with choroplethr package

Visualize violent crime rates in different US States with choroplethr package

I knew choroplethr package by the blog post Animated Choropleths in R a few days ago. As a another visualization tool in R language, I wana try this one.

To install the latest stable release(CRAN) type the following from an R console:

install.packages("choroplethr")

To install the development version using the devtools package from github:

library(devtools)
install_github("choroplethr", "trulia")
library(choroplethr)

It's not interesting for me to run just example codes written in choroplethr package, I used other data from rMaps package as a quick data source and visualize it!

library(devtools)
install_github("ramnathv/[email protected]")
install_github("ramnathv/rMaps")

Now we can use violent crime rates data in US included in rMaps package.

We can create animated choropleths as the following page:

In my case, we just process the data and visualize it as the follwing simple code:

# load packages
library(rMaps)
library(choroplethr)
# initialization list and get years from violent_crime data
choropleths = list()
# Get years for loop
years <- sort(unique(violent_crime$Year))
# convert to level data
violent_crime$Crime <- cut(violent_crime$Crime, 9)
# Create choropleth component.
for (i in 1:length(years)) {
df <- subset(violent_crime, Year == years[i])
# We need to change the column names for choroplethr function
colnames(df) <- c("Year", "region", "value")
# Cut decimal off df$value <- round(df$value)
title <- paste0("Violent crime rates: ", years[i])
choropleths[[i]] = choroplethr(df, "state", title = title)
}
# Vizualize it!
choroplethr_animate(choropleths)

The result is published via Dropbox as the following (image)link.

Enjoy!

To leave a comment for the author, please follow the link and comment on their blog: My Life as a Mock Quant in English.

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.



If you got this far, why not subscribe for updates from the site? Choose your flavor: e-mail, twitter, RSS, or facebook...

Comments are closed.

Search R-bloggers

Sponsors

Never miss an update!
Subscribe to R-bloggers to receive
e-mails with the latest R posts.
(You will not see this message again.)

Click here to close (This popup will not appear again)