SCM

SCM Repository

[matrix] Diff of /pkg/R/ldenseMatrix.R
ViewVC logotype

Diff of /pkg/R/ldenseMatrix.R

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 2004, Tue Jul 17 22:12:30 2007 UTC revision 2005, Wed Jul 18 14:46:20 2007 UTC
# Line 163  Line 163 
163                else all(x@x, ..., na.rm = na.rm)                else all(x@x, ..., na.rm = na.rm)
164            })            })
165    
166  setMethod("any", signature(x = "ldenseMatrix"),  ## setMethod("any", ) ---> ./lMatrix.R
167            function(x, ..., na.rm = FALSE)  
168            (prod(dim(x)) >= 1 && is(x, "triangularMatrix") && x@diag == "U") ||  ## setMethod("any", signature(x = "ldenseMatrix"),
169            any(x@x, ..., na.rm = na.rm))  ##        function(x, ..., na.rm = FALSE)
170    ##        (prod(dim(x)) >= 1 && is(x, "triangularMatrix") && x@diag == "U") ||
171    ##        any(x@x, ..., na.rm = na.rm))
172    
173    setMethod("norm", signature(x = "ldenseMatrix", type = "character"),
174              function(x, type, ...)
175              .Call(dgeMatrix_norm, as(as(x,"dMatrix"),"dgeMatrix"), type),
176              valueClass = "numeric")
177    
178    setMethod("rcond", signature(x = "ldenseMatrix", type = "character"),
179              function(x, type, ...)
180              .Call(dgeMatrix_rcond, as(as(x,"dMatrix"),"dgeMatrix"), type),
181              valueClass = "numeric")
182    

Legend:
Removed from v.2004  
changed lines
  Added in v.2005

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