I don't really understand all the excitement here.  

It's quick enough to define a function to do what you want, no?

R> NewYear <- as.Date("2013-01-01")
R> Easter <- Sys.Date()
R> cppFunction('double ddiff(Date a, Date b) { return a - b; }')
R> cppFunction('double ddiff2(Date a, Date b) { return b - a; }')
R> ddiff(NewYear, Easter)
[1] 89                            ## I find this more logical
R> ddiff2(NewYear, Easter)
[1] -89                           ## closer to R's difftime and 'odd' to me
R> 

Dirk

-- 
Dirk Eddelbuettel | e...@debian.org | http://dirk.eddelbuettel.com
_______________________________________________
Rcpp-devel mailing list
Rcpp-devel@lists.r-forge.r-project.org
https://lists.r-forge.r-project.org/cgi-bin/mailman/listinfo/rcpp-devel

Reply via email to