r - 日期时间操作：获取明天的日期

Question

我有一个“yyyy.mm.dd”形式的日期字符串，我想创建一个简单的函数 TomorrowDate() 将日期增加一个日历日。某种形式的东西：

>TomorrowDate("2013.01.20")
"2013.01.21"

有什么建议吗？谢谢！

score 3 · Accepted Answer

中的文档?As.Date包含有关从字符表示转换为字符表示以及日期算术的详细信息。此类在内部是从 1970-01-01 开始的天数，因此您只需将日期加 1 即可获得下一个日期。然后，您可以使用format所需的字符表示形式返回日期。

TomorrowDate <- function(x) 
   format(
     as.Date(x, format = "%Y.%m.%d") + 1, 
     format = "%Y.%m.%d"
   )

score 0 · Accepted Answer

这应该这样做： 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"

2 回答 2