SCM

SCM Repository

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

Diff of /pkg/R/ddenseMatrix.R

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

revision 1708, Fri Dec 22 19:53:37 2006 UTC revision 1714, Thu Dec 28 22:11:32 2006 UTC
# Line 123  Line 123 
123            function(x, vectors, ...) callGeneric(as(x, "dgeMatrix"), vectors))            function(x, vectors, ...) callGeneric(as(x, "dgeMatrix"), vectors))
124    
125    
 ## Cheap version: work via "dgeMatrix" and use the group methods there:  
 ## FIXME(?): try to preserve "symmetric", "triangular", ...  
 setMethod("Arith", ##  "+", "-", "*", "^", "%%", "%/%", "/"  
           signature(e1 = "ddenseMatrix", e2 = "ddenseMatrix"),  
           function(e1, e2) callGeneric(as(e1, "dgeMatrix"),  
                                        as(e2, "dgeMatrix")))  
 setMethod("Arith",  
           signature(e1 = "ddenseMatrix", e2 = "numeric"),  
           function(e1, e2) callGeneric(as(e1, "dgeMatrix"), e2))  
 setMethod("Arith",  
           signature(e1 = "numeric", e2 = "ddenseMatrix"),  
           function(e1, e2) callGeneric(e1, as(e2, "dgeMatrix")))  
   
126  setMethod("Math",  setMethod("Math",
127            signature(x = "ddenseMatrix"),            signature(x = "ddenseMatrix"),
128            function(x) callGeneric(as(x, "dgeMatrix")))            function(x) callGeneric(as(x, "dgeMatrix")))

Legend:
Removed from v.1708  
changed lines
  Added in v.1714

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