if (FALSE) {
#load data
data(selection_files)
#save 'Raven' selection tables in the temporary directory
writeLines(selection_files[[7]], con = file.path(tempdir(), names(selection_files)[7]))
syr.dat <- imp_syrinx(all.data = FALSE)
# View(syr.dat)
#getting all the data
syr.dat <- imp_syrinx(all.data = TRUE)
# View(syr.dat)
}
Run the code above in your browser using DataLab