Nothing
#' load and return data when lazyLoad false insted of using data(datastr)
#' @param datastr name of datasets
#' @param package default sigora
#' @return returns the data
#' @export
#' @examples
#' idmap <- load_data("idmap")
#'
load_data <- function(datastr, package = "sigora") {
utils::data(list = datastr, package = package)
return(eval(parse(text = datastr)))
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.