hexbin faceted choropleths in R

gistfile1.txt

library(rgdal)
library(rgeos)
library(ggplot2)
library(readr)
library(tidyr)
library(dplyr)
library(grid)

us <- readOGR("us_states_hexgrid.geojson", "OGRGeoJSON")

centers <- cbind.data.frame(data.frame(gCentroid(us, byid=TRUE), id=us@data$iso3166_2))

us_map <- fortify(us, region="iso3166_2")

intensity <- c(D0="Abnormally Dry", D1="Moderate Drought", D2="Severe Drought",
               D3="Extreme Drought", D4="Exceptional Drought")

today <- format(Sys.Date(), "%Y%m%d")

read_csv(sprintf("http://droughtmonitor.unl.edu/USDMStatistics.ashx/?mode=table&aoi=state&date=%s", today)) %>%
  gather(drought_level, value, D0, D1, D2, D3, D4) %>%
  mutate(intensity=factor(intensity[drought_level],
                          levels=as.character(intensity), ordered=TRUE)) -> drought

gg <- ggplot()
gg <- gg + geom_map(data=us_map, map=us_map,
                    aes(x=long, y=lat, map_id=id),
                    color="white", size=0.5)
gg <- gg + geom_map(data=drought, map=us_map,
                    aes(fill=value, map_id=State))
gg <- gg + geom_map(data=drought, map=us_map,
                    aes(map_id=State),
                    fill="#ffffff", alpha=0, color="white",
                    show_guide=FALSE)
gg <- gg + geom_text(data=centers, aes(label=id, x=x, y=y), color="white", size=4)
gg <- gg + scale_fill_distiller(name="State\nDrought\nCoverage", palette="RdPu", na.value="#7f7f7f",
                                labels=sprintf("%d%%", c(0, 25, 50, 75, 100)))
gg <- gg + coord_map()
gg <- gg + facet_wrap(~intensity, ncol=2)
gg <- gg + labs(x=NULL, y=NULL, title=sprintf("U.S. Drought Conditions as of %s\n", Sys.Date()))
gg <- gg + theme_bw()
gg <- gg + theme(plot.title=element_text(face="bold", hjust=0, size=24))
gg <- gg + theme(panel.border=element_blank())
gg <- gg + theme(panel.margin=unit(3, "lines"))
gg <- gg + theme(panel.grid=element_blank())
gg <- gg + theme(axis.ticks=element_blank())
gg <- gg + theme(axis.text=element_blank())
gg <- gg + theme(strip.background=element_blank())
gg <- gg + theme(strip.text=element_text(face="bold", hjust=0, size=14))
gg <- gg + theme(legend.position=c(0.75, 0.15))
gg <- gg + theme(legend.direction="horizontal")
gg <- gg + theme(legend.title.align=1)

png(sprintf("%s.png", today), width=800, height=800)
print(gg)
dev.off()

us_states_hexgrid.geojson

{"type": "FeatureCollection", "features": [{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-72.625738,55.313204],[-69.902864,54.408434],[-69.902864,52.537442],[-72.625738,51.57081],[-75.348611,52.537442],[-75.348611,54.408434],[-72.625738,55.313204]]]},"properties":{"cartodb_id":1219,"created_at":"2015-05-13T22:26:15Z","updated_at":"2015-05-14T14:19:34Z","label":"Maine","bees":60.5,"iso3166_2":"ME"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-72.625738,49.57439],[-69.902864,48.544312],[-69.902864,46.419873],[-72.625738,45.325375],[-75.348611,46.419873],[-75.348611,48.544312],[-72.625738,49.57439]]]},"properties":{"cartodb_id":1217,"created_at":"2015-05-13T22:24:35Z","updated_at":"2015-05-14T14:21:30Z","label":"R.I.","bees":47.8,"iso3166_2":"RI"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-80.794358,52.537442],[-78.071485,51.57081],[-78.071485,49.57439],[-80.794358,48.544312],[-83.517232,49.57439],[-83.517232,51.57081],[-80.794358,52.537442]]]},"properties":{"cartodb_id":1218,"created_at":"2015-05-13T22:25:00Z","updated_at":"2015-05-14T14:21:58Z","label":"Vt.","bees":33.9,"iso3166_2":"VT"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-135.251828,31.882459],[-132.528955,30.53798],[-132.528955,27.792925],[-135.251828,26.393432],[-137.974702,27.792925],[-137.974702,30.53798],[-135.251828,31.882459]]]},"properties":{"cartodb_id":220,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:18:52Z","label":"H.I.","bees":13.9,"iso3166_2":"HI"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-108.023093,31.882459],[-105.30022,30.53798],[-105.30022,27.792925],[-108.023093,26.393432],[-110.745967,27.792925],[-110.745967,30.53798],[-108.023093,31.882459]]]},"properties":{"cartodb_id":215,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:21:41Z","label":"Texas","bees":46.3,"iso3166_2":"TX"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-94.408726,35.798214],[-91.685852,34.512972],[-91.685852,31.882459],[-94.408726,30.53798],[-97.131599,31.882459],[-97.131599,34.512972],[-94.408726,35.798214]]]},"properties":{"cartodb_id":228,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:18:01Z","label":"Ala.","bees":48.1,"iso3166_2":"AL"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-116.191714,35.798214],[-113.46884,34.512972],[-113.46884,31.882459],[-116.191714,30.53798],[-118.914587,31.882459],[-118.914587,34.512972],[-116.191714,35.798214]]]},"properties":{"cartodb_id":232,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:18:04Z","label":"Ariz.","bees":42.9,"iso3166_2":"AZ"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-88.962979,35.798214],[-86.240105,34.512972],[-86.240105,31.882459],[-88.962979,30.53798],[-91.685852,31.882459],[-91.685852,34.512972],[-88.962979,35.798214]]]},"properties":{"cartodb_id":227,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:18:43Z","label":"Ga.","bees":34.9,"iso3166_2":"GA"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-105.30022,35.798214],[-102.577346,34.512972],[-102.577346,31.882459],[-105.30022,30.53798],[-108.023093,31.882459],[-108.023093,34.512972],[-105.30022,35.798214]]]},"properties":{"cartodb_id":230,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:19:31Z","label":"La.","bees":44.3,"iso3166_2":"LA"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-99.854473,35.798214],[-97.131599,34.512972],[-97.131599,31.882459],[-99.854473,30.53798],[-102.577346,31.882459],[-102.577346,34.512972],[-99.854473,35.798214]]]},"properties":{"cartodb_id":229,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:19:59Z","label":"Miss.","bees":38.7,"iso3166_2":"MS"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-110.745967,35.798214],[-108.023093,34.512972],[-108.023093,31.882459],[-110.745967,30.53798],[-113.46884,31.882459],[-113.46884,34.512972],[-110.745967,35.798214]]]},"properties":{"cartodb_id":231,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:21:15Z","label":"Okla.","bees":63.4,"iso3166_2":"OK"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-118.914587,39.530104],[-116.191714,38.307039],[-116.191714,35.798214],[-118.914587,34.512972],[-121.637461,35.798214],[-121.637461,38.307039],[-118.914587,39.530104]]]},"properties":{"cartodb_id":249,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:21:44Z","label":"Utah","bees":33.5,"iso3166_2":"UT"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-116.191714,43.071698],[-113.46884,41.912567],[-113.46884,39.530104],[-116.191714,38.307039],[-118.914587,39.530104],[-118.914587,41.912567],[-116.191714,43.071698]]]},"properties":{"cartodb_id":264,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:18:16Z","label":"Colo.","bees":38,"iso3166_2":"CO"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-102.577346,39.530104],[-99.854473,38.307039],[-99.854473,35.798214],[-102.577346,34.512972],[-105.30022,35.798214],[-105.30022,38.307039],[-102.577346,39.530104]]]},"properties":{"cartodb_id":246,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:18:10Z","label":"Ark.","bees":48.3,"iso3166_2":"AR"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-91.685852,39.530104],[-88.962979,38.307039],[-88.962979,35.798214],[-91.685852,34.512972],[-94.408726,35.798214],[-94.408726,38.307039],[-91.685852,39.530104]]]},"properties":{"cartodb_id":244,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:20:37Z","label":"N.C.","bees":41.5,"iso3166_2":"NC"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-88.962979,43.071698],[-86.240105,41.912567],[-86.240105,39.530104],[-88.962979,38.307039],[-91.685852,39.530104],[-91.685852,41.912567],[-88.962979,43.071698]]]},"properties":{"cartodb_id":259,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:21:53Z","label":"Va.","bees":45.6,"iso3166_2":"VA"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-94.408726,43.071698],[-91.685852,41.912567],[-91.685852,39.530104],[-94.408726,38.307039],[-97.131599,39.530104],[-97.131599,41.912567],[-94.408726,43.071698]]]},"properties":{"cartodb_id":260,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:22:24Z","label":"W.Va.","bees":59.5,"iso3166_2":"WV"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-124.360334,39.530104],[-121.637461,38.307039],[-121.637461,35.798214],[-124.360334,34.512972],[-127.083208,35.798214],[-127.083208,38.307039],[-124.360334,39.530104]]]},"properties":{"cartodb_id":250,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:18:13Z","label":"Calif.","bees":40.1,"iso3166_2":"CA"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-108.023093,39.530104],[-105.30022,38.307039],[-105.30022,35.798214],[-108.023093,34.512972],[-110.745967,35.798214],[-110.745967,38.307039],[-108.023093,39.530104]]]},"properties":{"cartodb_id":247,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:19:19Z","label":"Kan.","bees":40.8,"iso3166_2":"KS"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-99.854473,43.071698],[-97.131599,41.912567],[-97.131599,39.530104],[-99.854473,38.307039],[-102.577346,39.530104],[-102.577346,41.912567],[-99.854473,43.071698]]]},"properties":{"cartodb_id":261,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:19:25Z","label":"Ky.","bees":47.7,"iso3166_2":"KY"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-83.517232,43.071698],[-80.794358,41.912567],[-80.794358,39.530104],[-83.517232,38.307039],[-86.240105,39.530104],[-86.240105,41.912567],[-83.517232,43.071698]]]},"properties":{"cartodb_id":258,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:19:44Z","label":"Md.","bees":60.9,"iso3166_2":"MD"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-105.30022,43.071698],[-102.577346,41.912567],[-102.577346,39.530104],[-105.30022,38.307039],[-108.023093,39.530104],[-108.023093,41.912567],[-105.30022,43.071698]]]},"properties":{"cartodb_id":262,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:20:07Z","label":"Mo.","bees":34.9,"iso3166_2":"MO"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-110.745967,43.071698],[-108.023093,41.912567],[-108.023093,39.530104],[-110.745967,38.307039],[-113.46884,39.530104],[-113.46884,41.912567],[-110.745967,43.071698]]]},"properties":{"cartodb_id":263,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:20:47Z","label":"Neb.","bees":37.3,"iso3166_2":"NE"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-113.46884,39.530104],[-110.745967,38.307039],[-110.745967,35.798214],[-113.46884,34.512972],[-116.191714,35.798214],[-116.191714,38.307039],[-113.46884,39.530104]]]},"properties":{"cartodb_id":248,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:21:03Z","label":"N.M.","bees":46.1,"iso3166_2":"NM"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-86.240105,39.530104],[-83.517232,38.307039],[-83.517232,35.798214],[-86.240105,34.512972],[-88.962979,35.798214],[-88.962979,38.307039],[-86.240105,39.530104]]]},"properties":{"cartodb_id":243,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:21:33Z","label":"S.C.","bees":26.6,"iso3166_2":"SC"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-97.131599,39.530104],[-94.408726,38.307039],[-94.408726,35.798214],[-97.131599,34.512972],[-99.854473,35.798214],[-99.854473,38.307039],[-97.131599,39.530104]]]},"properties":{"cartodb_id":245,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:21:38Z","label":"Tenn.","bees":36.4,"iso3166_2":"TN"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-124.360334,46.419873],[-121.637461,45.325375],[-121.637461,43.071698],[-124.360334,41.912567],[-127.083208,43.071698],[-127.083208,45.325375],[-124.360334,46.419873]]]},"properties":{"cartodb_id":282,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:18:56Z","label":"Idaho","bees":33.3,"iso3166_2":"ID"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-127.083208,43.071698],[-124.360334,41.912567],[-124.360334,39.530104],[-127.083208,38.307039],[-129.806081,39.530104],[-129.806081,41.912567],[-127.083208,43.071698]]]},"properties":{"cartodb_id":266,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:21:21Z","label":"Ore.","bees":25.2,"iso3166_2":"OR"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-102.577346,46.419873],[-99.854473,45.325375],[-99.854473,43.071698],[-102.577346,41.912567],[-105.30022,43.071698],[-105.30022,45.325375],[-102.577346,46.419873]]]},"properties":{"cartodb_id":278,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:19:05Z","label":"Ill.","bees":62.4,"iso3166_2":"IL"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-86.240105,46.419873],[-83.517232,45.325375],[-83.517232,43.071698],[-86.240105,41.912567],[-88.962979,43.071698],[-88.962979,45.325375],[-86.240105,46.419873]]]},"properties":{"cartodb_id":275,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:21:25Z","label":"Pa.","bees":60.6,"iso3166_2":"PA"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-97.131599,46.419873],[-94.408726,45.325375],[-94.408726,43.071698],[-97.131599,41.912567],[-99.854473,43.071698],[-99.854473,45.325375],[-97.131599,46.419873]]]},"properties":{"cartodb_id":277,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:19:12Z","label":"Ind.","bees":49.1,"iso3166_2":"IN"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-108.023093,46.419873],[-105.30022,45.325375],[-105.30022,43.071698],[-108.023093,41.912567],[-110.745967,43.071698],[-110.745967,45.325375],[-108.023093,46.419873]]]},"properties":{"cartodb_id":279,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:19:15Z","label":"Iowa","bees":61.4,"iso3166_2":"IA"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-121.637461,43.071698],[-118.914587,41.912567],[-118.914587,39.530104],[-121.637461,38.307039],[-124.360334,39.530104],[-124.360334,41.912567],[-121.637461,43.071698]]]},"properties":{"cartodb_id":265,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:20:51Z","label":"Nev.","bees":26.7,"iso3166_2":"NV"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-80.794358,46.419873],[-78.071485,45.325375],[-78.071485,43.071698],[-80.794358,41.912567],[-83.517232,43.071698],[-83.517232,45.325375],[-80.794358,46.419873]]]},"properties":{"cartodb_id":274,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:20:57Z","label":"N.J.","bees":47.6,"iso3166_2":"NJ"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-113.46884,46.419873],[-110.745967,45.325375],[-110.745967,43.071698],[-113.46884,41.912567],[-116.191714,43.071698],[-116.191714,45.325375],[-113.46884,46.419873]]]},"properties":{"cartodb_id":280,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:21:35Z","label":"S.D.","bees":36.1,"iso3166_2":"SD"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-91.685852,46.419873],[-88.962979,45.325375],[-88.962979,43.071698],[-91.685852,41.912567],[-94.408726,43.071698],[-94.408726,45.325375],[-91.685852,46.419873]]]},"properties":{"cartodb_id":276,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:21:11Z","label":"Ohio","bees":49.8,"iso3166_2":"OH"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-118.914587,46.419873],[-116.191714,45.325375],[-116.191714,43.071698],[-118.914587,41.912567],[-121.637461,43.071698],[-121.637461,45.325375],[-118.914587,46.419873]]]},"properties":{"cartodb_id":281,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:22:30Z","label":"Wyo.","bees":32.5,"iso3166_2":"WY"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-83.517232,49.57439],[-80.794358,48.544312],[-80.794358,46.419873],[-83.517232,45.325375],[-86.240105,46.419873],[-86.240105,48.544312],[-83.517232,49.57439]]]},"properties":{"cartodb_id":290,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:21:07Z","label":"N.Y.","bees":54.1,"iso3166_2":"NY"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-127.083208,49.57439],[-124.360334,48.544312],[-124.360334,46.419873],[-127.083208,45.325375],[-129.806081,46.419873],[-129.806081,48.544312],[-127.083208,49.57439]]]},"properties":{"cartodb_id":298,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:22:02Z","label":"Wash.","bees":39.3,"iso3166_2":"WA"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-105.30022,49.57439],[-102.577346,48.544312],[-102.577346,46.419873],[-105.30022,45.325375],[-108.023093,46.419873],[-108.023093,48.544312],[-105.30022,49.57439]]]},"properties":{"cartodb_id":294,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:22:05Z","label":"Wis.","bees":60.2,"iso3166_2":"WI"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-78.071485,49.57439],[-75.348611,48.544312],[-75.348611,46.419873],[-78.071485,45.325375],[-80.794358,46.419873],[-80.794358,48.544312],[-78.071485,49.57439]]]},"properties":{"cartodb_id":289,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:19:38Z","label":"Mass.","bees":46.4,"iso3166_2":"MA"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-94.408726,49.57439],[-91.685852,48.544312],[-91.685852,46.419873],[-94.408726,45.325375],[-97.131599,46.419873],[-97.131599,48.544312],[-94.408726,49.57439]]]},"properties":{"cartodb_id":292,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:19:50Z","label":"Mich.","bees":27.7,"iso3166_2":"MI"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-110.745967,49.57439],[-108.023093,48.544312],[-108.023093,46.419873],[-110.745967,45.325375],[-113.46884,46.419873],[-113.46884,48.544312],[-110.745967,49.57439]]]},"properties":{"cartodb_id":295,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:19:54Z","label":"Minn.","bees":51.2,"iso3166_2":"MN"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-121.637461,49.57439],[-118.914587,48.544312],[-118.914587,46.419873],[-121.637461,45.325375],[-124.360334,46.419873],[-124.360334,48.544312],[-121.637461,49.57439]]]},"properties":{"cartodb_id":297,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:20:21Z","label":"Mont.","bees":41.1,"iso3166_2":"MT"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-116.191714,49.57439],[-113.46884,48.544312],[-113.46884,46.419873],[-116.191714,45.325375],[-118.914587,46.419873],[-118.914587,48.544312],[-116.191714,49.57439]]]},"properties":{"cartodb_id":296,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:20:42Z","label":"N.D.","bees":40.4,"iso3166_2":"ND"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-132.528955,55.313204],[-129.806081,54.408434],[-129.806081,52.537442],[-132.528955,51.57081],[-135.251828,52.537442],[-135.251828,54.408434],[-132.528955,55.313204]]]},"properties":{"cartodb_id":331,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:17:56Z","label":"A.K.","bees":null,"iso3166_2":"AK"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-75.348611,46.419873],[-72.625738,45.325375],[-72.625738,43.071698],[-75.348611,41.912567],[-78.071485,43.071698],[-78.071485,45.325375],[-75.348611,46.419873]]]},"properties":{"cartodb_id":273,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:18:23Z","label":"Conn.","bees":57.5,"iso3166_2":"CT"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-80.794358,39.530104],[-78.071485,38.307039],[-78.071485,35.798214],[-80.794358,34.512972],[-83.517232,35.798214],[-83.517232,38.307039],[-80.794358,39.530104]]]},"properties":{"cartodb_id":242,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:18:32Z","label":"D.C.","bees":null,"iso3166_2":"DC"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-78.071485,43.071698],[-75.348611,41.912567],[-75.348611,39.530104],[-78.071485,38.307039],[-80.794358,39.530104],[-80.794358,41.912567],[-78.071485,43.071698]]]},"properties":{"cartodb_id":257,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:18:36Z","label":"Del.","bees":61,"iso3166_2":"DE"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-91.685852,31.882459],[-88.962979,30.53798],[-88.962979,27.792925],[-91.685852,26.393432],[-94.408726,27.792925],[-94.408726,30.53798],[-91.685852,31.882459]]]},"properties":{"cartodb_id":212,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:18:39Z","label":"Fla.","bees":54.8,"iso3166_2":"FL"}},{"type":"Feature","geometry":{"type":"Polygon","coordinates":[[[-75.348611,52.537442],[-72.625738,51.57081],[-72.625738,49.57439],[-75.348611,48.544312],[-78.071485,49.57439],[-78.071485,51.57081],[-75.348611,52.537442]]]},"properties":{"cartodb_id":305,"created_at":"2015-05-13T22:02:22Z","updated_at":"2015-05-14T14:20:54Z","label":"N.H.","bees":39.4,"iso3166_2":"NH"}}]}

Hi,

I've got an error message in the line number 9 code.

"us <- readOGR("us_states_hexgrid.geojson", "OGRGeoJSON")"

Error in ogrInfo(dsn = dsn, layer = layer, encoding = encoding, use_iconv = use_iconv, :

GDAL Error 3: Cannot open file 'us_states_hexgrid.geojson'

Could you please resolve it?

Curious about this error as well. Interesting topic.

• I really need to figure out how to get notices abt comments on gists
• You need the latest gdal library and the a fresh install of rgdal
• You need the shapefile referenced in the previous blog post. Here's the link to said shapefile https://team.cartodb.com/u/andrew/tables/andrew.us_states_hexgrid/public/map
• I also added it here