## Not run: ------------------------------------
# url <- "national-esri-16122011/COM20111216_ELB_region.shp"
# electorates <- getElectorateShapes(url)
# library(ggplot2)
# ggplot(data=electorates$data) +
# geom_map(aes(fill=AREA_SQKM, map_id=id), map=electorates$map) +
# expand_limits(
# x=range(electorates$map$long),
# y=range(electorates$map$lat)
# )
## ---------------------------------------------
Run the code above in your browser using DataLab