R: Examples for 'lubridate::as.period'

### ** Examples

span <- interval(ymd_hms("2009-01-01 00:00:00"), ymd_hms("2010-02-02 01:01:01")) #interval
as.period(span)

[1] "1y 1m 1d 1H 1M 1S"

as.period(span, unit = "day")

[1] "397d 1H 1M 1S"

"397d 1H 1M 1S"

[1] "397d 1H 1M 1S"

leap <- interval(ymd("2016-01-01"), ymd("2017-01-01"))
as.period(leap, unit = "days")

[1] "366d 0H 0M 0S"

as.period(leap, unit = "years")

[1] "1y 0m 0d 0H 0M 0S"

dst <- interval(ymd("2016-11-06", tz = "America/Chicago"),
ymd("2016-11-07", tz = "America/Chicago"))
# as.period(dst, unit = "seconds")
as.period(dst, unit = "hours")

[1] "25H 0M 0S"

per <- period(hours = 10, minutes = 6)
as.numeric(per, "hours")

[1] 10.1

as.numeric(per, "minutes")

[1] 606

Examples for 'lubridate::as.period'

Change an object to a period