「yyyy.mm.dd」の形式の日付文字列があり、日付を 1 暦日増やす単純な関数 TomorrowDate() を作成したいと思います。フォームの何か:
>TomorrowDate("2013.01.20")
"2013.01.21"
何かアドバイス?ありがとう!
のドキュメントに?As.Date
は、文字表現との間の変換、および日付演算の詳細が記載されています。このクラスは、内部的には 1970 年 1 月 1 日からの日数であるため、日付に 1 を加算するだけで次の日付を取得できます。次に、使用format
して、希望する文字表現で日付を返します。
TomorrowDate <- function(x)
format(
as.Date(x, format = "%Y.%m.%d") + 1,
format = "%Y.%m.%d"
)
これはそれを行う必要があります:
format(as.Date("2013.01.20",format="%Y.%m.%d")+1,"%Y.%m.%d")
関数が必要な場合は、簡単に実行できます
TomorrowDate <- function(x) {
format(as.Date(x,format="%Y.%m.%d")+1,"%Y.%m.%d")
}
TomorrowDate("2013.01.20")
[1] "2013.01.21"