# NOT RUN {
# create temporary directory
tmpdir <- tempdir()
fs::dir_create(paste0(tmpdir,"/data/"))
# load sample files into temporary directory
cs_example(path = paste0(tmpdir,"/data/"))
# list files
list.files(paste0(tmpdir,"/data/"))
# delete data
fs::dir_delete(paste0(tmpdir,"/data/"))
# }
Run the code above in your browser using DataLab