#' Download maps
#'
#' @param x x = 'state' or x = 'municip'.
#'
#' @return State border or the municipal bounderis.
#' @export
#'
#' @examples
mapof <- function(x = c('state', 'municip')){
if (x == 'state'){
return(state)
} else if (x == 'municip'){
return(municip)
}
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.