r - R:如何获取每月的星期数

我是R新手。
我想要日期所属的月份的星期数。

通过使用以下代码：

>CurrentDate<-Sys.Date()
>Week Number <- format(CurrentDate, format="%U")
>Week Number
"31"

％U将返回一年中的第几周。
但是我想要一个月的星期数。
如果日期是2014-08-01，那么我想得到1.（日期属于该月的第一周）。

例如：
2014-09-04-> 1（日期属于该月的第一周）。
2014-09-10-> 2（日期属于该月的第二周）。
等等...

我怎么能得到这个？

参考：
http://astrostatistics.psu.edu/su07/R/html/base/html/strptime.html

最佳答案

您可以从lubridate软件包中使用day。我不确定软件包中是否有一个星期的类型函数，但是我们可以进行数学计算。

library(lubridate)
curr <- Sys.Date()
# [1] "2014-08-08"
day(curr)               ## 8th day of the current month
# [1] 8
day(curr) / 7           ## Technically, it's the 1.14th week
# [1] 1.142857
ceiling(day(curr) / 7)  ## but ceiling() will take it up to the 2nd week.
# [1] 2

关于r - R:如何获取每月的星期数，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/25199851/