SCM

SCM Repository

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

Diff of /pkg/R/dMatrix.R

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

revision 656, Wed Mar 16 16:55:32 2005 UTC revision 657, Wed Mar 16 16:57:52 2005 UTC
# Line 1  Line 1 
1  ### Define Methods that can be inherited for all subclasses  ### Define Methods that can be inherited for all subclasses
2    
3    if(paste(R.version$major, R.version$minor, sep=".") < "2.0.1") {
4        ## for R 2.0.0 (and earlier)
5        setAs("dMatrix", "dgeMatrix",
6              function(from) new("dgeMatrix", x = from@x,
7                                 Dim = from@Dim, Dimnames = from@Dimnames))
8    }
9    
10  setAs("dMatrix", "matrix",  setAs("dMatrix", "matrix",
11        function(from) as(as(from, "dgeMatrix"), "matrix"))        function(from) as(as(from, "dgeMatrix"), "matrix"))
12    

Legend:
Removed from v.656  
changed lines
  Added in v.657

root@r-forge.r-project.org
ViewVC Help
Powered by ViewVC 1.0.0  
Thanks to:
Vienna University of Economics and Business University of Wisconsin - Madison Powered By FusionForge