## code to prepare `DATASET` dataset goes here
ffr_fdr_sample <- read.csv('ffr_sample.csv')
usethis::use_data(ffr_fdr_sample, overwrite = TRUE)
hazard_accumulate_sample <- read.csv('hazard_accumulate.csv')
hazard_accumulate_sample$CALC_PROD_DT_ind <- substr(as.character(hazard_accumulate_sample$CALC_PROD_DT_ind), 3, 6)
usethis::use_data(hazard_accumulate_sample, overwrite = TRUE)
svc_sellin <- read.csv('svc_sellin.csv')
usethis::use_data(svc_sellin, overwrite = TRUE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.