从sysdate中提取月号而在R中没有0

Question

我试图通过这个来获取R中代码的当前月份数字 -

currentDate<-Sys.Date()
month_num <- format(Sys.Date(),"%m")

今天我得到的输出是“03”（28/03/2018） 有没有办法可以获得3？ 如Jan：1，Feb：2等12月12日 （没有硬编码）

Answer 1

lubridate包有一个名为month的函数，可以执行您想要的操作

library(lubridate)
month(currentDate)