## transform values to a list (and do not write)
data(ExampleData.BINfileData, envir = environment())
object <- Risoe.BINfileData2RLum.Analysis(CWOSL.SAR.Data)[[1]]
write_RLum2CSV(object, export = FALSE)
if (FALSE) {
## write to a temporary file
temp_file <- tempfile(pattern = "output", fileext = ".csv")
write_RLum2CSV(object, temp_file)
## write to the working directory
write_RLum2CSV(object)
}
Run the code above in your browser using DataLab