在R中如何从POSIXct等格式的日期列生成年积日列？

以下方案支持POSIXct格式、字符型格式的日期输入，返回的年积日取值范围为1-366，自动适配闰年规则，匹配你给出的2020-11-16对应321的示例要求。

方法1：基础包实现（无需安装额外依赖） #

使用base包内置的strftime函数搭配格式符%j即可直接提取：

• 输入为POSIXct格式列的情况：
  假设数据框为df，日期列名为date_col，代码如下：

  df$doy <- as.integer(strftime(df$date_col, format = "%j"))
  

• 输入为字符型日期列的情况：
  先将字符列转为POSIXct格式再提取，默认适配YYYY-MM-DD格式的字符日期：

  df$doy <- as.integer(strftime(as.POSIXct(df$date_col, format = "%Y-%m-%d"), format = "%j"))
  

格式符%j是POSIX标准定义的年积日标识，自动识别闰年，无需额外编写闰年判断逻辑。

方法2：lubridate包实现（语法更简洁） #

如果使用tidyverse生态，调用lubridate的yday()函数可一步完成：

1. 先加载包：

   library(lubridate)
   

2. 提取年积日：
   • POSIXct格式输入：df$doy <- yday(df$date_col)
   • 字符型格式输入（默认适配YYYY-MM-DD）：df$doy <- yday(ymd(df$date_col))

你给出的测试日期运行验证：

# 基础包方案
as.integer(strftime(as.POSIXct("2020-11-16"), format = "%j"))
# lubridate方案
yday(as.POSIXct("2020-11-16"))

两种方法运行返回结果均为321，完全符合预期。

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