时间戳

首页 > 解决方案 > 是否有一个函数（最好在 lubridate 中）来获取任何给定年份的周数？

r - 是否有一个函数（最好在 lubridate 中）来获取任何给定年份的周数？

问题描述

我可能可以硬编码一个查找表并从中引用，但我想知道任何 R 包中是否有一个方便的函数可以返回给定年份的周数。需要 ISO 8601 日历。

lubridate具有isoweek返回给定日期的周数的功能

lubridate::isoweek("2020-12-31")

lubridate::isoweek("2021-12-31")

但是，我需要的是类似

isoweeks(2020)这将返回 53

isoweeks(2021)这将返回 52

标签： rlubridate

解决方案

不知道是否有这样的功能，但您可以使用以下方法创建自己的功能lubridate：

weeks <- function(year) {
  
  lubridate::isoweek(paste0(year, "-12-31"))
  
}

weeks(2020)
#53

推荐阅读