日期应该总是有一个特定的日子,因此考虑在YYYYMM的末尾添加日期(在下面的示例中为月份的第一天01)。将numeric值转换为character,然后将character转换为Date: as.Date(paste0(as.character(201603), '01'), format='%Y%m%d')