Skip to contents

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, ...)

Arguments

l

list of generic_spct or derived classes

class

character The multi spectrum object class or the expected class for the elements of l

ncol

integer Number of 'virtual' columns in data

byrow

logical If ncol > 1 how to read in the data

dim

integer vector of dimensions

...

ignored

Functions

  • calibration_mspct(): Specialization for collections of calibration_spct objects.

  • raw_mspct(): Specialization for collections of raw_spct objects.

  • cps_mspct(): Specialization for collections of cps_spct objects.

  • source_mspct(): Specialization for collections of source_spct objects.

  • filter_mspct(): Specialization for collections of filter_spct objects.

  • reflector_mspct(): Specialization for collections of reflector_spct objects.

  • object_mspct(): Specialization for collections of object_spct objects.

  • solute_mspct(): Specialization for collections of solute_spct objects.

  • response_mspct(): Specialization for collections of response_spct objects.

  • chroma_mspct(): Specialization for collections of chroma_spct objects.

Note

Setting class = source_spct or class = source_mspct makes no difference

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 ---