SCM

SCM Repository

[matrix] Annotation of /pkg/Matrix/R/ddenseMatrix.R
ViewVC logotype

Annotation of /pkg/Matrix/R/ddenseMatrix.R

Parent Directory Parent Directory | Revision Log Revision Log


Revision 792 - (view) (download)
Original Path: pkg/R/ddenseMatrix.R

1 : bates 686 ### Define Methods that can be inherited for all subclasses
2 :    
3 : maechler 792 ## -- see also ./Matrix.R e.g., for a show() method
4 :    
5 : bates 686 ## These methods are the 'fallback' methods for all dense numeric
6 : maechler 792 ## matrices in that they simply coerce the ddenseMatrix to a
7 :     ## dgeMatrix. Methods for special forms override these.
8 : bates 686
9 :     setMethod("norm", signature(x = "ddenseMatrix", type = "missing"),
10 :     function(x, type, ...) callGeneric(as(x, "dgeMatrix")))
11 :    
12 :     setMethod("norm", signature(x = "ddenseMatrix", type = "character"),
13 :     function(x, type, ...) callGeneric(as(x, "dgeMatrix"), type))
14 :    
15 :     setMethod("rcond", signature(x = "ddenseMatrix", type = "missing"),
16 :     function(x, type, ...) callGeneric(as(x, "dgeMatrix")))
17 :    
18 :     setMethod("rcond", signature(x = "ddenseMatrix", type = "character"),
19 :     function(x, type, ...) callGeneric(as(x, "dgeMatrix"), type))
20 :    
21 :     setMethod("t", signature(x = "ddenseMatrix"),
22 :     function(x) callGeneric(as(x, "dgeMatrix")))
23 :    
24 :     setMethod("tcrossprod", signature(x = "ddenseMatrix"),
25 :     function(x) callGeneric(as(x, "dgeMatrix")))
26 :    
27 :     setMethod("crossprod", signature(x = "ddenseMatrix", y = "missing"),
28 :     function(x, y = NULL) callGeneric(as(x, "dgeMatrix")))
29 :    
30 :     setMethod("diag", signature(x = "ddenseMatrix"),
31 :     function(x = 1, nrow, ncol = n) callGeneric(as(x, "dgeMatrix")))
32 :    
33 :     setMethod("solve", signature(a = "ddenseMatrix", b = "missing"),
34 :     function(a, b, ...) callGeneric(as(a, "dgeMatrix")))
35 :    
36 :     setMethod("solve", signature(a = "ddenseMatrix", b = "ANY"),
37 :     function(a, b, ...) callGeneric(as(a, "dgeMatrix"), b))
38 :    
39 :     setMethod("lu", signature(x = "ddenseMatrix"),
40 :     function(x, ...) callGeneric(as(x, "dgeMatrix")))
41 :    
42 :     setMethod("determinant", signature(x = "dgeMatrix", logarithm = "missing"),
43 :     function(x, logarithm, ...) callGeneric(as(x, "dgeMatrix")))
44 :    
45 :     setMethod("determinant", signature(x = "dgeMatrix", logarithm = "logical"),
46 :     function(x, logarithm, ...)
47 :     callGeneric(as(x, "dgeMatrix"), logarithm))
48 :    
49 :     setMethod("expm", signature(x = "ddenseMatrix"),
50 :     function(x) callGeneric(as(x, "dgeMatrix")))
51 :    
52 :     setMethod("Schur", signature(x = "ddenseMatrix", vectors = "missing"),
53 :     function(x, vectors, ...) callGeneric(as(x, "dgeMatrix")))
54 :    
55 :     setMethod("Schur", signature(x = "ddenseMatrix", vectors = "logical"),
56 :     function(x, vectors, ...) callGeneric(as(x, "dgeMatrix"), vectors))
57 :    
58 : maechler 792

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