#' @import here
read_raw_listings <- function() {
read.csv(file = paste0(here(), "/data/raw_listings.csv"), na.strings= "")
}
#' @import here
read_tidy_listings <- function() {
load(paste0(here(), "/data/tidy_listings.RData"), .GlobalEnv)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.