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 1280, Tue May 23 08:01:44 2006 UTC revision 1329, Fri Jul 21 06:47:06 2006 UTC
# Line 5  Line 5 
5  setAs("dgRMatrix", "dgTMatrix",  setAs("dgRMatrix", "dgTMatrix",
6        function(from) .Call(compressed_to_dgTMatrix, from, FALSE))        function(from) .Call(compressed_to_dgTMatrix, from, FALSE))
7    
8    ### FIXME: Activate the following with "little" change in ../src/dgCMatrix.c
9    ### -----  similar to compressed_to_dgTMatrix above       ~~~~~~~~~~~~~~~~~~
10    
11  ##setAs("dgRMatrix", "matrix",  ##setAs("dgRMatrix", "matrix",
12  ##      function(from) .Call(csc_to_matrix, from))  ##      function(from) .Call(csc_to_matrix, from))
13    
# Line 20  Line 23 
23  ##setMethod("diag", signature(x = "dgRMatrix"),  ##setMethod("diag", signature(x = "dgRMatrix"),
24  ##          function(x = 1, nrow, ncol = n) .Call(csc_getDiag, x))  ##          function(x = 1, nrow, ncol = n) .Call(csc_getDiag, x))
25    
26    setAs("dgRMatrix", "dgCMatrix",
27          function(from) as(as(from, "dgTMatrix"), "dgCMatrix"))
28    
29  ## try to define for "Matrix" -- once and for all -- but that fails -- why? __ FIXME __  ## try to define for "Matrix" -- once and for all -- but that fails -- why? __ FIXME __
30  ## setMethod("dim", signature(x = "dgRMatrix"),  ## setMethod("dim", signature(x = "dgRMatrix"),
31  ##           function(x) x@Dim, valueClass = "integer")  ##           function(x) x@Dim, valueClass = "integer")

Legend:
Removed from v.1280  
changed lines
  Added in v.1329

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