微信公众号搜"智元新知"关注
微信扫一扫可直接关注哦!

是否有一个函数最好是在 lubridate 中来获取任何给定年份的周数?

如何解决是否有一个函数最好是在 lubridate 中来获取任何给定年份的周数?

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

lubridate 具有函数 isoweek,它返回给定日期的周数

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

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

但是,我需要的是类似的东西

isoweeks(2020) 将返回 53

isoweeks(2021) 将返回 52

解决方法

不知道是否有这样的函数,但您可以使用 lubridate 创建自己的函数:

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

weeks(2020)
#53

版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。