如何從年份和月份中扣除月份

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" 

注意：沒有使用外部軟件包