#' London outline
#' @description Load shapefile of London's outline (Greater London Authority) as a SpatialPolygonsDataFrame
#' @return Object 'lon', a single row SpatialPolygonsDataFrame
#' @export
#' @example examples/load_lon.R
load_lon = function(){
require(maptools)
path = system.file("external/london_outline_simple.shp", package="londonShapefiles")
lon <<- readShapePoly(path, proj4string=CRS('+init=epsg:27700'))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.