我有一个“yyyy.mm.dd”形式的日期字符串,我想创建一个简单的函数TomorrowDate(),它将日期增加一个日历日。形式的东西:
>TomorrowDate("2013.01.20")
"2013.01.21"
有什么建议吗?谢谢!
答案 0 :(得分:3)
?As.Date
中的文档包含有关转换和转换为字符表示以及日期算术的详细信息。此类在内部是1970-01-01之间的天数,因此您只需在日期中添加1即可获得下一个日期。然后,使用format
以所需的字符表示形式返回日期。
TomorrowDate <- function(x)
format(
as.Date(x, format = "%Y.%m.%d") + 1,
format = "%Y.%m.%d"
)
答案 1 :(得分: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"