
216
13
章
lubridate
による日付と時刻
ggplot(aes(week, n)) +
geom_line()
丸めた日付と丸めていない日付との差を計算しておくと便利です。
13.3.3
要素を設定する
アクセサ関数を使って日付時間の要素を設定できます。
(datetime <- ymd_hms("2016-07-08 12:34:56"))
#> [1] "2016-07-08 12:34:56 UTC"
year(datetime) <- 2020
datetime
#> [1] "2020-07-08 12:34:56 UTC"
month(datetime) <- 01
datetime
#> [1] "2020-01-08 12:34:56 UTC"
hour(datetime) <- hour(datetime) + 1
datetime
#>[1] "2020-01-08 13:34:56 UTC"
他にも
update()
で新たな日付時刻を作るという方法があります。
update()
では複数の値をまとめ
て設定できま
す。
update(datetime, year = 2020, month = 2, mday = 2, hour = 2)
#> [1] "2020-02-02 02:34:56 UTC"
大きすぎる値でもきちんと処理します。
ymd("2015-02-01") %>%
update(mday = 30)
#> [1] "2015-03-02"
ymd("2015-02-01") ...