从日期减去月份并忽略R中的夏季/冬季时间

Question

以下是我的例子：

library(lubridate)
sample_date <- as.POSIXct('2017-04-01')
sample_date %m-% months(1)

它给了我：

"2017-02-28 23:00:00 CST"

虽然我想：

"2017-03-01 CDT"

如何忽略夏季/冬季时差？

更新

我想我不可能拥有"2017-03-01 CDT"，但我也会考虑 "2017-03-01 CST"

更大的问题。我主要使用日期而不是日期时间，我应该使用什么格式来避免这个夏天/冬天的时间？

Answer 1

如果您对时间部分不感兴趣，请使用Date对象如何：

library(lubridate)
sample_date <- as.Date('2017-04-01')
sample_date %m-% months(1)
#> [1] "2017-03-01"