uFTIR (version 0.1.4)

as.clipper: As Clipper

Description

Coerce a SAM or Smooth object to clipper. A function useful to call highlight_substance when clipping is not necessary.

Usage

as.clipper(object, slice = 1)

Arguments

object

The SAM or Smooth object to be coerced.

slice

The slice to keep (a clipper is essentially a matrix).

Value

and S3 clipper

Examples

# NOT RUN {
x <- tile_read(base::system.file("extdata/tile.bsp", package = "uFTIR"))
x <- tile_base_corr(x)
x <- wavealign(x, primpke)
x <- tile_sam(x)
x <- as.clipper(x)
# }