Extract class information from a generic spectrum.
Details
The value returned is equivalent to the set intersection of the
value returned by class(x)
and the value returned by
spct_classes
, but preserving the order of the members of
the character vector.
Examples
class_spct(sun.spct)
#> [1] "source_spct" "generic_spct"
class(sun.spct)
#> [1] "source_spct" "generic_spct" "tbl_df" "tbl" "data.frame"