如何从数值型month列生成起始为1的数值型year列（不依赖lubridate）

核心方法：整数除法计算年份 #

可以利用R的整数除法运算符%/%实现需求，这个方法不依赖任何额外包，且能适配任意数量的月份（包括非12的倍数的情况）。

具体代码如下：

library(tibble)
library(dplyr)

# 示例数据
df <- tibble(month = seq(1:120))

# 添加year变量
df <- df %>%
  mutate(year = (month - 1) %/% 12 + 1)

# 查看结果
head(df, 15)

代码逻辑说明 #

• (month - 1)：把月份起始点从1偏移到0，让第1-12个月变为0-11，第13-24个月变为12-23，以此类推，保证整数除法的分组逻辑正确。
• %/% 12：对偏移后的数值做整数除法，得到从0开始的年份索引（第1年对应0，第2年对应1……）。
• + 1：将索引转换为从1开始的年份编号，完全匹配需求。

非12倍数场景验证 #

如果月份总数不是12的倍数（比如123个月），这个方法依然能正确分组：

df_non_multiple <- tibble(month = seq(1:123)) %>%
  mutate(year = (month - 1) %/% 12 + 1)

# 查看最后5行结果
tail(df_non_multiple, 5)

输出会显示最后5行的year值为11，符合预期（121-123个月属于第11年）。

对比原rep方法的优势 #

原方法rep(1:10, each = 12)仅适用于月份数恰好是12倍数的场景，需要提前计算年份数量；而整数除法的方法无需预设年份数，能自动适配任意长度的month列，通用性更强。

内容的提问来源于stack exchange，提问作者tom