SCM

SCM Repository

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

Diff of /pkg/R/lsparseMatrix.R

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

revision 1704, Fri Dec 15 23:19:41 2006 UTC revision 1705, Sat Dec 16 12:37:25 2006 UTC
# Line 39  Line 39 
39    
40  setMethod("diag", signature(x = "lsparseMatrix"),  setMethod("diag", signature(x = "lsparseMatrix"),
41            function(x, nrow, ncol = n) diag(as(x, "lgCMatrix")))            function(x, nrow, ncol = n) diag(as(x, "lgCMatrix")))
42    
43    
44    setMethod("all", signature(x = "lsparseMatrix"),
45              function(x, ..., na.rm = TRUE)
46              !is(x, "triangularMatrix") && all(x@x, ..., na.rm = na.rm))
47    
48    setMethod("any", signature(x = "lsparseMatrix"),
49              function(x, ..., na.rm = TRUE)
50              ## logical unit-triangular has TRUE diagonal:
51              (is(x, "triangularMatrix") && x@diag == "U") ||
52              any(x@x, ..., na.rm = na.rm))

Legend:
Removed from v.1704  
changed lines
  Added in v.1705

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