eem_spectral_cor: Multiply EEMs with spectral correction vectors (Emission and...

In staRdom: PARAFAC Analysis of EEMs from DOM

Multiply EEMs with spectral correction vectors (Emission and Excitation)

Description

Multiply EEMs with spectral correction vectors (Emission and Excitation)

Usage

eem_spectral_cor(eem_list, Excor, Emcor)

Arguments

eem_list	eemlist
Excor	data frame, first column wavelengths, second column excitation correction
Emcor	data frame, first column wavelengths, second column emission correction

Value

eemlist

Examples

eems <- system.file("extdata/EEMs",package="staRdom")
eem_list <- eem_read(eems, recursive = TRUE, import_function = eem_csv)

excorfile <- system.file("extdata/CorrectionFiles/xc06se06n.csv",package="staRdom")
Excor <- data.table::fread(excorfile)
emcorfile <- system.file("extdata/CorrectionFiles/mcorrs_4nm.csv",package="staRdom")
Emcor <- data.table::fread(emcorfile)

# adjust range of EEMs to cover correction vectors
eem_list <- eem_range(eem_list,ex = range(Excor[,1]), em = range(Emcor[,1]))

eem_list_sc <- eem_spectral_cor(eem_list,Excor,Emcor)

staRdom documentation built on July 9, 2023, 5:57 p.m.