location is not set correctly after using eem_remove_blank #52
Description
After using eem_remove_blank, the location of the samples is set to ".".
And eem_raman_normalisation does not work properly then.
I used version 1.0.0, the current GitHub master.
I hope, you can follow the problem with the code below:
require(eemR)
file <- system.file("extdata/cary/scans_day_1", "sample1.csv", package = "eemR")
eem <- eem_read(file, import_function = "cary")
file <- system.file("extdata/cary/scans_day_1", "nano.csv", package = "eemR")
blank <- eem_read(file, import_function = "cary")
eems <- eem_bind(eem,blank)
eems2 <- eem_remove_blank(eems)
lapply(eems2,`[[`,"location")
eems3 <- eem_raman_normalisation(eems2)