This example shows how it is possible to use crossfilter bar charts (up to any number) to visually subset a choropleth. The map above shows the population and per-capita income growth of the US from 2011-2012.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
ZipDir <- "/small_zip_files/" | |
StatesDir <- "~/by_state_hh/" | |
StateFipsFile <- "~/state_fips.csv" | |
PumaCodeMapFile <- "~/new_puma.csv" | |
RegionFilenames <- c("ss10hil.csv") # you may specify multiple states | |
RegionPumas <- seq(03501, 03519, 1) | |
MatchVars <- c("HINCP","NOC","TEN","BLD") | |
Matches <- RunModel(1000) # use lower sample size to test, higher for greater accuracy | |
ZipCodes <- MatchesToZips(Matches) |