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, May 28, 2008 at 9: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 <- 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 like to calculate only working day. > > I the a possibility to count on woring days without weekends? > > Is it maybe also possible to skip in addition the national holiday dates? > > Thanks a lit for your help > Thorsten > > Mit freundlichen Grüßen / Best Regards / С наилучшими пожеланиями / > üdvözlettel > > Dr .Th.Mühge, > > [[alternative HTML version deleted]] > > > ______________________________________________ > 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. > > ______________________________________________ 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.