Instead of 

   time.f1 <- system(x2 <- f1(input=x, parms=p))

you probably meant

   time.f1 <- system.time(x2 <- f1(input=x, parms=p))

Also see the rbenchmark and microbenchmark packages.

Dirk

-- 
Dirk Eddelbuettel | [email protected] | http://dirk.eddelbuettel.com
_______________________________________________
Rcpp-devel mailing list
[email protected]
https://lists.r-forge.r-project.org/cgi-bin/mailman/listinfo/rcpp-devel

Reply via email to