folder <- system.file("extdata/EEMs", package = "staRdom") # load example data
eem_list <- eem_read(folder, recursive = TRUE, import_function = eem_csv)
data(absorbance)
eem_metatemplate(eem_list,absorbance)
Run the code above in your browser using DataLab