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
>
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.
