I've confirmed that this works on R 3.1.1 under OS X, using RcppArmadillo
0.4.450.1.0:
*diff --git a/inst/examples/lmBenchmark.R b/inst/examples/lmBenchmark.R*
*index 9037107..dd49375 100644*
*--- a/inst/examples/lmBenchmark.R*
*+++ b/inst/examples/lmBenchmark.R*
@@ -37,7 +37,7 @@ exprs$QR <- expression(.Call("fastLm", mm, y, 1L,
PACKAGE="Rcp
exprs$LLt <- expression(.Call("fastLm", mm, y, 3L, PACKAGE="RcppEigen"))
if (suppressMessages(require("RcppArmadillo", character=TRUE,
quietly=TRUE))) {
- exprs$arma <- expression(.Call("fastLm", mm, y,
PACKAGE="RcppArmadillo"))
+ exprs$arma <- expression(.Call("RcppArmadillo_fastLm", mm, y,
PACKAGE="Rcpp
}
if (suppressMessages(require("RcppGSL", character=TRUE, quietly=TRUE))) {
_______________________________________________
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
