~ubuntu-branches/ubuntu/trusty/r-cran-rcpparmadillo/trusty

« back to all changes in this revision

Viewing changes to R/fastLm.R

  • Committer: Package Import Robot
  • Author(s): Dirk Eddelbuettel
  • Date: 2013-12-09 18:13:21 UTC
  • mfrom: (1.1.9)
  • Revision ID: package-import@ubuntu.com-20131209181321-cc9ycvs53xfiz5ow
Tags: 0.3.930.1-1
New upstream release

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
 
 
2
1
## fastLm.R: Rcpp/Armadillo implementation of lm()
3
2
##
4
 
## Copyright (C)  2010 - 2012  Dirk Eddelbuettel, Romain Francois and Douglas Bates
 
3
## Copyright (C)  2010 - 2013  Dirk Eddelbuettel, Romain Francois and Douglas Bates
5
4
##
6
5
## This file is part of RcppArmadillo.
7
6
##
22
21
 
23
22
    stopifnot(is.matrix(X), is.numeric(y), nrow(y)==nrow(X))
24
23
 
25
 
    .Call("fastLm", X, y, package = "RcppArmadillo")
 
24
    .Call( "RcppArmadillo_fastLm", X, y, PACKAGE = "RcppArmadillo" )
26
25
}
27
26
 
28
27
fastLm <- function(X, ...) UseMethod("fastLm")