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