嗨,我正在尝试用lubridate获取一系列日期
这不起作用
seq(ymd('2012-04-07'),ymd('2013-03-22'),by=week(1))
Run Code Online (Sandbox Code Playgroud)
基本命令
seq(as.Date('2012-04-7'),as.Date('2013-03-22'),'weeks')
Run Code Online (Sandbox Code Playgroud)
但是,我想知道是否有一种优雅的方式与lubridate这样做.
编辑
请忽略:解决自己,所以只留下后人.很高兴在必要时将其删除.
seq(ymd('2012-04-07'),ymd('2013-03-22'),by='weeks')
Run Code Online (Sandbox Code Playgroud)
诀窍
我试图从日期中减去n个月,如下所示:
maturity <- as.Date("2012/12/31")
m <- as.POSIXlt(maturity)
m$mon <- m$mon - 6
Run Code Online (Sandbox Code Playgroud)
但结果日期是01-Jul-2012,而不是30-Jun-2012我所期望的.有没有简短的方法来获得这样的结果?
提前致谢