SCM

SCM Repository

[matrix] View of /pkg/R/eigen.R
ViewVC logotype

View of /pkg/R/eigen.R

Parent Directory Parent Directory | Revision Log Revision Log


Revision 574 - (download) (annotate)
Sat Feb 26 18:06:32 2005 UTC (14 years, 3 months ago) by maechler
File size: 756 byte(s)
cosmetic
setMethod("eigen", signature(x = "dgeMatrix", only.values = "missing"),
          function(x, symmetric, only.values, EISPACK) {# << must match generic
              nCall <- match.call()
              nCall$only.values <- FALSE
              eval(nCall, parent.frame())
          })

setMethod("eigen", signature(x = "dgeMatrix", only.values = "logical"),
          function(x, symmetric, only.values, EISPACK)
          .Call("dgeMatrix_eigen", x, only.values)
          )

setMethod("Schur", signature(x = "dgeMatrix", vectors = "missing"),
          function(x, vectors, ...) Schur(x, TRUE, ...))

setMethod("Schur", signature(x = "dgeMatrix", vectors = "logical"),
          function(x, vectors, ...) .Call("dgeMatrix_Schur", x, vectors)
          )


root@r-forge.r-project.org
ViewVC Help
Powered by ViewVC 1.0.0  
Thanks to:
Vienna University of Economics and Business Powered By FusionForge