[Rcpp-commits] r3105 - pkg/RcppEigen/src

[noreply at r-forge.r-project.org]

Author: dmbates
Date: 2011-06-25 14:53:14 +0200 (Sat, 25 Jun 2011)
New Revision: 3105

Modified:
   pkg/RcppEigen/src/fastLm.cpp
Log:
tighten code a bit


Modified: pkg/RcppEigen/src/fastLm.cpp
===================================================================
--- pkg/RcppEigen/src/fastLm.cpp	2011-06-23 18:03:32 UTC (rev 3104)
+++ pkg/RcppEigen/src/fastLm.cpp	2011-06-25 12:53:14 UTC (rev 3105)
@@ -168,7 +168,7 @@
 	const MVectorXd       yy(y.begin(), n);
         const MMatrixXd       XX(X.begin(), n, p);
 
-	lm                   ans = do_lm(MMatrixXd(X.begin(), n, p), yy, ::Rf_asInteger(type));
+	lm                   ans = do_lm(XX, yy, ::Rf_asInteger(type));
 	NumericVector       coef(ans.coef().data(), ans.coef().data() + p);
 				// install the names, if available
 	List            dimnames = X.attr("dimnames");