Rubberband baseline correction — spc_rubberband • hyperSpec

Baseline with support points determined from a convex hull of the spectrum.

Use debuglevel >= 1 to obtain debug plots, either directly via function argument or by setting hyperSpec's debuglevel option.

spc_rubberband(spc, ..., upper = FALSE, noise = 0, spline = TRUE)

Arguments

spc: hyperSpec object
...: further parameters handed to stats::smooth.spline()
upper: logical indicating whether the lower or upper part of the hull should be used
noise: noise level to be taken into account
spline: logical indicating whether the baseline should be an interpolating spline through the support points or piece wise linear.

Value

hyperSpec object containing the baselines

Note

This function is still experimental

See also

spc_fit_poly(), spc_fit_poly_below()

vignette ("baseline")

hy_set_options()

Author

Claudia Beleites

Examples

plot(paracetamol[, , 175 ~ 1800])
bl <- spc_rubberband(paracetamol[, , 175 ~ 1800], noise = 300, df = 20)
plot(bl, add = TRUE, col = 2)


plot(paracetamol[, , 175 ~ 1800] - bl)