SCM

SCM Repository

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

Diff of /pkg/R/Rsparse.R

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

revision 1348, Mon Aug 7 09:05:00 2006 UTC revision 1349, Mon Aug 7 09:05:42 2006 UTC
# Line 66  Line 66 
66                x <- as(x, "dgTMatrix")                x <- as(x, "dgTMatrix")
67                callGeneric()                callGeneric()
68            })            })
69    
70    
71    ## Want tril(), triu(), band() --- just as "indexing" ---
72    ## return a "close" class:
73    setMethod("tril", "RsparseMatrix",
74              function(x, k = 0, ...) as_Rsparse(tril(as_Csparse(x), k = k, ...)))
75    setMethod("triu", "RsparseMatrix",
76              function(x, k = 0, ...) as_Rsparse(triu(as_Csparse(x), k = k, ...)))
77    setMethod("band", "RsparseMatrix",
78              function(x, k1, k2, ...)
79              as_Rsparse(band(as_Csparse(x), k1 = k1, k2 = k2, ...)))

Legend:
Removed from v.1348  
changed lines
  Added in v.1349

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