Nothing
determine_geo_id_names <- function(census.geo) {
switch(
census.geo,
"tract" = c("county", "tract"),
"block_group" = c("county", "tract", "block_group"),
"block" = c("county", "tract", "block"),
# Return `census.geo` unchanged for county, place, and zcta
census.geo
)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.