Converts a list of spectral objects into a "multi spectrum" object by setting the class attribute of the list of spectra to the corresponding multi-spct class, check that components of the list belong to the expected class.
Usage
generic_mspct(
l = NULL,
class = "generic_spct",
ncol = 1,
byrow = FALSE,
dim = c(length(l)%/%ncol, ncol)
)
calibration_mspct(l = NULL, ncol = 1, byrow = FALSE, ...)
raw_mspct(l = NULL, ncol = 1, byrow = FALSE, ...)
cps_mspct(l = NULL, ncol = 1, byrow = FALSE, ...)
source_mspct(l = NULL, ncol = 1, byrow = FALSE, ...)
filter_mspct(l = NULL, ncol = 1, byrow = FALSE, ...)
reflector_mspct(l = NULL, ncol = 1, byrow = FALSE, ...)
object_mspct(l = NULL, ncol = 1, byrow = FALSE, ...)
solute_mspct(l = NULL, ncol = 1, byrow = FALSE, ...)
response_mspct(l = NULL, ncol = 1, byrow = FALSE, ...)
chroma_mspct(l = NULL, ncol = 1, byrow = FALSE, ...)
Functions
calibration_mspct()
: Specialization for collections ofcalibration_spct
objects.raw_mspct()
: Specialization for collections ofraw_spct
objects.cps_mspct()
: Specialization for collections ofcps_spct
objects.source_mspct()
: Specialization for collections ofsource_spct
objects.filter_mspct()
: Specialization for collections offilter_spct
objects.reflector_mspct()
: Specialization for collections ofreflector_spct
objects.object_mspct()
: Specialization for collections ofobject_spct
objects.solute_mspct()
: Specialization for collections ofsolute_spct
objects.response_mspct()
: Specialization for collections ofresponse_spct
objects.chroma_mspct()
: Specialization for collections ofchroma_spct
objects.
Examples
filter_mspct(list(polyester.spct, yellow_gel.spct))
#> Object: filter_mspct [2 x 1]
#> --- Member: spct_1 ---
#> Object: filter_spct [561 x 2]
#> Wavelength range 240-800 nm, step 1 nm
#> Label: Polyester, clear film, 0.000125 m thick, Autostat CT5 from McDermit Autotype; new
#> Rfr (/1): 0.074, thickness (mm): 0.125, attenuation mode: absorption.
#> Variables:
#> w.length: Wavelength [nm]
#> Tfr: Total spectral transmittance [/1]
#> --
#> # A tibble: 561 × 2
#> w.length Tfr
#> <int> <dbl>
#> 1 240 0.00482
#> 2 241 0.00464
#> 3 242 0.00446
#> 4 243 0.00429
#> 5 244 0.00414
#> 6 245 0.004
#> 7 246 0.004
#> 8 247 0.004
#> 9 248 0.004
#> 10 249 0.004
#> # ℹ 551 more rows
#> --- Member: spct_2 ---
#> Object: filter_spct [611 x 2]
#> Wavelength range 190-800 nm, step 1 nm
#> Label: Theatrical 'gel', type 'Canary Supergel no312; new; from Rosco, UK
#> Rfr (/1): 0.080, thickness (mm): 0.0900, attenuation mode: absorption.
#> Variables:
#> w.length: Wavelength [nm]
#> Tfr: Total spectral transmittance [/1]
#> --
#> # A tibble: 611 × 2
#> w.length Tfr
#> <int> <dbl>
#> 1 190 0.00271
#> 2 191 0.00222
#> 3 192 0.00172
#> 4 193 0.00122
#> 5 194 0.00108
#> 6 195 0.00058
#> 7 196 0.0000100
#> 8 197 0.0000100
#> 9 198 0.0000100
#> 10 199 0.0000100
#> # ℹ 601 more rows
#>
#> --- END ---