On Dec 19, 2010, at 5:11 AM, Luca Meyer wrote:

Something goes wrong with the week function of the lubridate package:

x= as.POSIXct(factor(c("2010-12-15 17:28:27",
+     "2010-12-15 17:32:34",
+     "2010-12-15 18:48:39",
+     "2010-12-15 19:25:00",
+     "2010-12-16 08:00:00",
+     "2010-12-16 08:25:49",
+     "2010-12-16 09:00:00")))
require(lubridate)

weekdays(x)
[1] "Mercoledì" "Mercoledì" "Mercoledì" "Mercoledì" "Giovedì" "Giovedì" "Giovedì"
week(x)
[1] 50 50 50 50 51 51 51

But 2010-12-15 is a Wednesday and 2010-12-16 is a Thursday.

--
David.



Please notice Mercoledì=Wednesday and Giovedì=Thursday, why would the beginning of the week start on Thursday? Also please beware that on previous weeks this does not occur, that is all weeks till 49 will all begin on Mondays and end on Sundays as required.

Thanks,
Luca


Il giorno 18/dic/2010, alle ore 14.39, David Winsemius ha scritto:


On Dec 17, 2010, at 11:08 AM, Luca Meyer wrote:

x= factor(c("2009-03-30 00:00:00", "2009-04-06 00:00:00", "2009-04-13 00:00:00", "2009-04-20 00:00:00", "2009-04-27 00:00:00", "2009-05-04 00:00:00" ,"2009-05-11 00:00:00", "2009-05-18 00:00:00"))
require(lubridate)
xd=as.POSIXct(x)
week(xd)
# [1] 13 14 15 16 17 18 19 20
year(xd)
# [1] 2009 2009 2009 2009 2009 2009 2009 2009
paste(year(xd), " W",week(xd), sep="")
#[1] "2009 W13" "2009 W14" "2009 W15" "2009 W16" "2009 W17" "2009 W18" "2009 W19" "2009 W20"



David Winsemius, MD
West Hartford, CT


______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

David Winsemius, MD
West Hartford, CT

______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

Reply via email to