<div dir="ltr">I've confirmed that this works on R 3.1.1 under OS X, using RcppArmadillo <span style="color:rgb(80,0,80);font-family:arial,sans-serif;font-size:13px">0.4.450.1.0:</span><div><br></div><div><p style="margin:0px;font-size:11px;font-family:Menlo"><b>diff --git a/inst/examples/lmBenchmark.R b/inst/examples/lmBenchmark.R</b></p>
<p style="margin:0px;font-size:11px;font-family:Menlo"><b>index 9037107..dd49375 100644</b></p>
<p style="margin:0px;font-size:11px;font-family:Menlo"><b>--- a/inst/examples/lmBenchmark.R</b></p>
<p style="margin:0px;font-size:11px;font-family:Menlo"><b>+++ b/inst/examples/lmBenchmark.R</b></p>
<p style="margin:0px;font-size:11px;font-family:Menlo"><span style="color:rgb(52,187,199)">@@ -37,7 +37,7 @@</span> exprs$QR <- expression(.Call("fastLm", mm, y, 1L, PACKAGE="Rcp</p>
<p style="margin:0px;font-size:11px;font-family:Menlo"> exprs$LLt <- expression(.Call("fastLm", mm, y, 3L, PACKAGE="RcppEigen"))</p>
<p style="margin:0px;font-size:11px;font-family:Menlo;min-height:13px"> </p>
<p style="margin:0px;font-size:11px;font-family:Menlo"> if (suppressMessages(require("RcppArmadillo", character=TRUE, quietly=TRUE))) {</p>
<p style="margin:0px;font-size:11px;font-family:Menlo;color:rgb(195,55,32)">-    exprs$arma <- expression(.Call("fastLm", mm, y, PACKAGE="RcppArmadillo"))</p>
<p style="margin:0px;font-size:11px;font-family:Menlo;color:rgb(52,189,38)">+    exprs$arma <- expression(.Call("RcppArmadillo_fastLm", mm, y, PACKAGE="Rcpp</p>
<p style="margin:0px;font-size:11px;font-family:Menlo"> }</p>
<p style="margin:0px;font-size:11px;font-family:Menlo;min-height:13px"> </p>
<p style="margin:0px;font-size:11px;font-family:Menlo"> if (suppressMessages(require("RcppGSL", character=TRUE, quietly=TRUE))) {</p></div></div>