setWhenMeasured {photobiology} | R Documentation |
Set the "when.measured" attribute
Description
Function to set by reference the "when" attribute of an existing generic_spct or an object of a class derived from generic_spct.
Usage
setWhenMeasured(x, when.measured, ...)
when_measured(x) <- value
## Default S3 method:
setWhenMeasured(x, when.measured, ...)
## S3 method for class 'generic_spct'
setWhenMeasured(x, when.measured = lubridate::now(tzone = "UTC"), ...)
## S3 method for class 'summary_generic_spct'
setWhenMeasured(x, when.measured = lubridate::now(tzone = "UTC"), ...)
## S3 method for class 'generic_mspct'
setWhenMeasured(x, when.measured = lubridate::now(tzone = "UTC"), ...)
Arguments
x |
a generic_spct object |
when.measured , value |
POSIXct to add as attribute, or a list of POSIXct. |
... |
Allows use of additional arguments in methods for other classes. |
Value
x
Methods (by class)
-
setWhenMeasured(default)
: default -
setWhenMeasured(generic_spct)
: generic_spct -
setWhenMeasured(summary_generic_spct)
: summary_generic_spct -
setWhenMeasured(generic_mspct)
: generic_mspct
Note
This method alters x itself by reference and in addition
returns x invisibly. If x is not a generic_spct or an object of a class derived from
generic_spct, x is not modified. If when
is not a POSIXct object
or NULL
an error is triggered. A POSIXct
describes an
instant in time (date plus time-of-day plus time zone).
See Also
Other measurement metadata functions:
add_attr2tb()
,
getFilterProperties()
,
getHowMeasured()
,
getInstrDesc()
,
getInstrSettings()
,
getSoluteProperties()
,
getWhatMeasured()
,
getWhenMeasured()
,
getWhereMeasured()
,
get_attributes()
,
isValidInstrDesc()
,
isValidInstrSettings()
,
select_spct_attributes()
,
setFilterProperties()
,
setHowMeasured()
,
setInstrDesc()
,
setInstrSettings()
,
setSoluteProperties()
,
setWhatMeasured()
,
setWhereMeasured()
,
spct_attr2tb()
,
spct_metadata()
,
subset_attributes()
,
trimInstrDesc()
,
trimInstrSettings()
Examples
my.spct <- sun.spct
when_measured(my.spct)
when_measured(my.spct) <- lubridate::ymd_hms("2020-01-01 08:00:00")
when_measured(my.spct)