【R】日付を操作する

日付の操作について、ご紹介します。 lubridate、RcppBDTライブラリがあります。

年・月・日を取得する(基本関数で)

date <- as.Date("2017-05-08")
year <- substr(date,1,4)
month <- substr(date,6,7)
day <- substr(date,9,10)

年・月・日を取得する(lubridateライブラリ)

library(lubridate)
year <- year(date)
month <- month(month)
date <- day(month)

月初にする(基本関数で)

paste(year,month,day,sep="-")

月初にする(lubridateライブラリ)

date - day(date) + 1

第3水曜日を取得(RcppBDTライブラリ)

library(RcppBDT)
getNthDayOfWeek(third, Wed, month(d), year(d)),date)