Re: [R] for loop if else conditional

2007-10-15 Thread Gabor Grothendieck
See ?seq.Date, e.g. now <- Sys.Date() dd <- seq(now - 20, now, by = "day") dd[as.POSIXlt(dd)$wday %% 6 != 0] and have a look at R News 4/1. On 10/15/07, Vishal Belsare <[EMAIL PROTECTED]> wrote: > date <- as.POSIXlt(Sys.time()) #present date > for (i in 1:difftime(as.PO

[R] for loop if else conditional

2007-10-15 Thread Vishal Belsare
date <- as.POSIXlt(Sys.time()) #present date for (i in 1:difftime(as.POSIXlt(Sys.Date()),"2007-10-01")) if (date$wday != 0 & date$wday != 6) {print(date);assign("date", (date-86400))} else (assign("date", (date-86400))) I am trying to print dates from present day to a day in the

[R] for loop if else conditional

2007-10-15 Thread Vishal Belsare
date <- as.POSIXlt(Sys.time()) #present date for (i in 1:difftime(as.POSIXlt(Sys.Date()),"2007-10-01")) if (date$wday != 0 & date$wday != 6) {print(date);assign("date", (date-86400))} else (assign("date", (date-86400))) I am trying to print dates from present day to a da

[R] for loop if else conditional

2007-10-15 Thread Vishal Belsare
date <- as.POSIXlt(Sys.time()) #present date for (i in 1:difftime(as.POSIXlt(Sys.Date()),"2007-10-01")) if (date$wday != 0 & date$wday != 6) {print(date);assign("date", (date-86400))} else (assign("date", (date-86400))) I am trying to print dates from present day to a day