-1

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

>TomorrowDate("2013.01.20")
"2013.01.21"

有什么建议吗?谢谢!

4

2 回答 2

3

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

TomorrowDate <- function(x) 
   format(
     as.Date(x, format = "%Y.%m.%d") + 1, 
     format = "%Y.%m.%d"
   )
于 2013-09-05T21:31:09.203 回答
0

这应该这样做: 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"
于 2013-09-05T21:32:42.837 回答