如何从年和月减去月份

Question

我想从年份和月份格式中减去给定日期的月份。

global_date = "2017-01"

我正在使用zoo库进行转换，如下所示：

as.yearmon(global_date) - 0.1

但它给了我2016年11月，我希望它为'201612'

我怎样才能在R？

中完成

Answer 1

由于我们要减去一个月，我们应该减去1/12 0.083而不是0.1

library(zoo)
as.yearmon(global_date) - (1/12)
#[1] "Dec 2016"

如果我们需要以上述格式输出

format(as.yearmon(global_date) - (1/12), "%Y%m")
#[1] "201612"

Answer 2

仅使用base R并仅对OP代码进行微小更改

format(as.Date(paste0(global_date, "-01")) - 0.1*10, "%Y%m")
#[1] "201612"

注意：没有使用外部包