#' Set access token (Zillow Web Service ID)
#'
#' @param id Zillow Web Service ID
#' @export
set_zwsid <- function(id) {
options('ZWSID' = id)
return(invisible())
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.