nr: Convert DRIFT-spectrum to normalized radiance units
In omega1x/spectrotest: Manipulate with DRIFT-spectroscopy data

Description Usage Arguments Details Value References Examples

View source: R/metric_nr.R

Convert raw DRIFT-spectrum recorded in transmittance mode (i.e. reflectance) to normalized radiance units expressed in units of power as it calculated by planck.

nr(x)

`x`	an object of `S3-class` drift.

Only raw DRIFT-spectra recorded into 3709 channels within 349.1157 - 7501.1654 cm^{-1} infrared range could be processed.

an object of S3-class drift exposed in SI-units of power: Wm^(-2)sr^(-1)(1/cm)^(-1).

Infrared Analysis of Particulates by FT-IR Emission/Transmission Spectroscopy. Peter R. Solomon et al., Applied Spectroscopy, Volume: 40 issue: 6, page(s): 746-759. DOI: 10.1366/0003702864508421.

gx <- median(nr(coal_drift("GX")))
oc <- median(nr(coal_drift("OC")))

vs <- gx - oc  # volatile substances
vs[["ftirValidFileName"]] <- "Volatile"
plot(slice(cbind(vs, oc, gx),,,3700))
abline(h = 0, col = "red")