This was already answered by two people when you posted
it the first time.
On Mon, Jun 2, 2008 at 12:34 PM, Thorsten Muehge <[EMAIL PROTECTED]> wrote:
> Hello R Freaks,
> I calculate the difference in days between two events with the following
> litte R expresseion:
>
> T1a <- strptime(T1,"%m/%d/%
Hello R Freaks,
I calculate the difference in days between two events with the following
litte R expresseion:
T1a <- strptime(T1,"%m/%d/%y %H:%M:%S");
T2a <- strptime(T2,"%m/%d/%y %H:%M:%S");
T1b <- as.Date(T1a);
T2b <- as.Date(T2a);
days <- T2b-T1b;
time <- T2a - T1a;
In the project I would lik
See ?is.holiday in chron. You need to supply
a .Holidays vector and then do this:
library(chron)
d1 <- Sys.Date()
d2 <- Sys.Date() + 100
sq <- sq(d1, d2, by = "day")
sum(!is.holiday(sq) & !is.weekend(sq)) # endpoints included
The fCalendar package also has functionality in this area.
On Wed, M
Try this:
# Without the weekend
sum(!format(seq(T1a, T2a, by = "days"), "%w") %in% c("0","6"))
On Wed, May 28, 2008 at 10:30 AM, Thorsten Muehge <[EMAIL PROTECTED]> wrote:
> Hello R Freaks,
> I calculate the difference in days between two events with the following
> litte R expresseion:
>
> T1a
Hello R Freaks,
I calculate the difference in days between two events with the following
litte R expresseion:
T1a <- strptime(T1,"%m/%d/%y %H:%M:%S");
T2a <- strptime(T2,"%m/%d/%y %H:%M:%S");
T1b <- as.Date(T1a);
T2b <- as.Date(T2a);
days <- T2b-T1b;
time <- T2a - T1a;
In the project I would lik
5 matches
Mail list logo
