assign_date | R Documentation |
This function will be removed on the next mctq
version. You can still find
it in the lubritime
package.
assign_date()
assign dates to two sequential hours. It can facilitate
time arithmetic by locating time values without a date reference on a
timeline.
assign_date(start, end, ambiguity = 0)
start, end |
An |
ambiguity |
(optional) a |
The mctq
package works with a set of object classes specially created to
hold time values. These classes can be found in the
lubridate and hms
packages. Please refer to those package documentations to learn more about
them.
ambiguity
argumentIn cases when start
is equal to end
, there are two possibilities of
intervals between the two hours (ambiguity). That's because start
and end
can be at the same point in time or they can distance themselves by one day,
considering a two-day timeline.
start,end start,end start,end start,end start end start end 10:00 10:00 10:00 10:00 -----|---------------|---------------|---------------|-----> 0h 0h 0h 0h 24h 24h 24h
You must instruct assign_date()
on how to deal with this problem if it
occurs. There are three options to choose.
ambiguity = 0
: to consider the interval between start
and end
as 0
hours, i.e., start
and end
are located at the same point in time
(default).
ambiguity = 24
: to consider the interval between start
and end
as 24
hours, i.e., start
and end
distance themselves by one day.
ambiguity = NA
: to disregard these cases, assigning NA
as value.
assign_date()
uses the
Unix epoch (1970-01-01) date as
the start date for creating intervals.
The output will always have "UTC"
set as timezone. Learn more about
time zones in ?timezone
.
POSIXt
objectsPOSIXt
objects passed as argument to start
or end
will be stripped of their dates. Only the time will be considered.
Both POSIXct
and POSIXlt
are
objects that inherits the class POSIXt
. Learn more about it in
?DateTimeClasses
.
NA
valuesassign_date()
will return an Interval
NA
-NA
if start
or end
are NA
.
A start
–end
Interval
object.
## Scalar example start <- hms::parse_hms("23:11:00") end <- hms::parse_hms("05:30:00") assign_date(start, end) #> [1] 1970-01-01 23:11:00 UTC--1970-01-02 05:30:00 UTC # Expected start <- hms::parse_hms("10:15:00") end <- hms::parse_hms("13:25:00") assign_date(start, end) #> [1] 1970-01-01 10:15:00 UTC--1970-01-01 13:25:00 UTC # Expected start <- hms::parse_hms("05:42:00") end <- hms::as_hms(NA) assign_date(start, end) #> [1] NA--NA # Expected ## Vector example start <- c(hms::parse_hm("09:45"), hms::parse_hm("20:30")) end <- c(hms::parse_hm("21:15"), hms::parse_hm("04:30")) assign_date(start, end) #> [1] 1970-01-01 09:45:00 UTC--1970-01-01 21:15:00 UTC # Expected #> [2] 1970-01-01 20:30:00 UTC--1970-01-02 04:30:00 UTC # Expected ## To assign a 24 hours interval to ambiguities start <- lubridate::as_datetime("1985-01-15 12:00:00") end <- lubridate::as_datetime("2020-09-10 12:00:00") assign_date(start, end, ambiguity = 24) #> [1] 1970-01-01 12:00:00 UTC--1970-01-02 12:00:00 UTC # Expected
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.