SCM

SCM Repository

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

Annotation of /pkg/R/ddenseMatrix.R

Parent Directory Parent Directory | Revision Log Revision Log


Revision 686 - (view) (download)

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

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