#' getDataset: this function allows the user to get the dataset
#'
#' @return dataset called "data"
#' @export
#'
#' @examples getData()
getDataset <- function(){
dataset <- read.csv(system.file("extdata", "PopularIndicators.csv", package = "PreliminaryAnalysis"), sep = ";")
return(dataset)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.