See a version of it live at http://shiny.rstudio.com/gallery/superzip-example.html
You can run this demo with:
if (!require(devtools))
install.packages("devtools")
devtools::install_github("rstudio/leaflet")
shiny::runGitHub("rstudio/shiny-examples", subdir="063-superzip-example")
Data compiled for Coming Apart: The State of White America, 1960–2010 by Charles Murray (Crown Forum, 2012). This app was inspired by the Washington Post's interactive feature Washington: A world apart.