## Not run: ------------------------------------
# library(tigris)
# library(ggplot2)
# library(ggthemes)
#
# nat <- native_areas(cb = TRUE)
#
# nat_map <- fortify(nat)
#
# gg <- ggplot()
# gg <- gg + geom_map(data=nat_map, map=nat_map,
# aes(x=long, y=lat, map_id=id),
# color="black", fill="white", size=0.25)
# gg <- gg + coord_map(xlim=c(-179.1506, -129.9795), # alaska
# ylim=c(51.2097, 71.4410))
# gg <- gg + theme_map()
# gg
## ---------------------------------------------
Run the code above in your browser using DataLab