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 1188, Fri Jan 20 18:12:04 2006 UTC revision 1189, Fri Jan 20 18:13:39 2006 UTC
# Line 20  Line 20 
20  ##setMethod("diag", signature(x = "dgRMatrix"),  ##setMethod("diag", signature(x = "dgRMatrix"),
21  ##          function(x = 1, nrow, ncol = n) .Call("csc_getDiag", x, PACKAGE = "Matrix"))  ##          function(x = 1, nrow, ncol = n) .Call("csc_getDiag", x, PACKAGE = "Matrix"))
22    
23  ## try to define for "Matrix" -- once and for all -- but that fails -- why?  ## try to define for "Matrix" -- once and for all -- but that fails -- why? __ FIXME __
24  setMethod("dim", signature(x = "dgRMatrix"),  ## setMethod("dim", signature(x = "dgRMatrix"),
25            function(x) x@Dim, valueClass = "integer")  ##           function(x) x@Dim, valueClass = "integer")
26    
27  ##setMethod("t", signature(x = "dgRMatrix"),  ##setMethod("t", signature(x = "dgRMatrix"),
28  ##          function(x) .Call("csc_transpose", x, PACKAGE = "Matrix"),  ##          function(x) .Call("csc_transpose", x, PACKAGE = "Matrix"),
# Line 30  Line 30 
30    
31  setMethod("image", "dgRMatrix",  setMethod("image", "dgRMatrix",
32            function(x, ...) {            function(x, ...) {
33                x = as(x, "dgTMatrix")                x <- as(x, "dgTMatrix")
34                callGeneric()                callGeneric()
35            })            })

Legend:
Removed from v.1188  
changed lines
  Added in v.1189

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