#' Load Postcode data - multipolygon
#'
#' @param var1 empty
#'
#' @return character
#' @export
#'
#' @examples
#' pc()
pc <- function(var1) {
readRDS(gzcon(url("https://github.com/dataning/bdmap/raw/master/level_four_multi.rds")))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.