Increase the wavelength step in stored spectral data in featureless regions to save storage space.
thin_wl(x, ...)# S3 method for default
thin_wl(x, ...)
# S3 method for generic_spct
thin_wl(x, max.wl.step = 10, max.slope.delta = 0.001, col.names, ...)
# S3 method for source_spct
thin_wl(
x,
max.wl.step = 10,
max.slope.delta = 0.001,
unit.out = getOption("photobiology.radiation.unit", default = "energy"),
...
)
# S3 method for response_spct
thin_wl(
x,
max.wl.step = 10,
max.slope.delta = 0.001,
unit.out = getOption("photobiology.radiation.unit", default = "energy"),
...
)
# S3 method for filter_spct
thin_wl(
x,
max.wl.step = 10,
max.slope.delta = 0.001,
qty.out = getOption("photobiology.filter.qty", default = "transmittance"),
...
)
# S3 method for reflector_spct
thin_wl(x, max.wl.step = 10, max.slope.delta = 0.001, ...)
# S3 method for raw_spct
thin_wl(x, max.wl.step = 10, max.slope.delta = 0.001, col.names, ...)
# S3 method for cps_spct
thin_wl(x, max.wl.step = 10, max.slope.delta = 0.001, col.names, ...)
# S3 method for object_spct
thin_wl(x, max.wl.step = 10, max.slope.delta = 0.001, col.names, ...)
# S3 method for chroma_spct
thin_wl(x, ...)
# S3 method for calibration_spct
thin_wl(x, ...)
# S3 method for generic_mspct
thin_wl(x, max.wl.step = 10, max.slope.delta = 0.001, ...)
# S3 method for chroma_mspct
thin_wl(x, ...)
# S3 method for calibration_mspct
thin_wl(x, ...)
An R object
additional named arguments passed down to f
.
numeric. Largest allowed wavelength difference between adjacent spectral values in nanometres (nm).
numeric in 0 to 1. Largest allowed change in relative slope of the spectral quantity per nm betweem adjacent pairs of values.
character. Name of the column of x
containing the
spectral data to check against max.slope.delta
. Currently only one
column supported.
character Allowed values "energy", and "photon", or its alias "quantum".
character Allowed values "transmittance", and "absorbance".
An object of the same class as x
but with a reduced density of
wavelength values in those regions were slope is shallow and featureless.
default
: Default for generic function
generic_spct
:
source_spct
:
response_spct
:
filter_spct
:
reflector_spct
:
raw_spct
:
cps_spct
:
object_spct
:
chroma_spct
:
calibration_spct
:
generic_mspct
:
chroma_mspct
:
calibration_mspct
:
The algorithm used for spectra is "naive" in an effort to keep it efficient. It works by iteratively attempting to delete every other observation along wavelengths, based on the criteria for maximum wavelength step and maximum relative step in the spectral variable between adjacent data values.
Other experimental utility functions:
collect2mspct()
,
drop_user_cols()
,
uncollect2spct()
# NOT RUN {
nrow(yellow_gel.spct)
wl_stepsize(yellow_gel.spct)
thinned.spct <- thin_wl(yellow_gel.spct)
nrow(thinned.spct)
wl_stepsize(thinned.spct)
# }
Run the code above in your browser using DataLab