| Line 212... |
Line 212... |
| 212 |
## FIXME: Once we have integer (idense..), sign(), abs(.) may need different:
|
212 |
## FIXME: Once we have integer (idense..), sign(), abs(.) may need different:
|
| 213 |
setMethod("Math", signature(x = "denseMatrix"),
|
213 |
setMethod("Math", signature(x = "denseMatrix"),
|
| 214 |
function(x) callGeneric(as(x, "dMatrix")))
|
214 |
function(x) callGeneric(as(x, "dMatrix")))
|
| 215 |
# -> ./ddenseMatrix.R has next method
|
215 |
# -> ./ddenseMatrix.R has next method
|
| 216 |
|
216 |
|
| 217 |
setMethod("rcond", signature(x = "denseMatrix", type = "character"),
|
217 |
setMethod("rcond", signature(x = "denseMatrix", norm = "character"),
|
| 218 |
function(x, type, ...)
|
218 |
function(x, norm, ...)
|
| 219 |
rcond(as(as(x, "dMatrix"), "dgeMatrix"), type=type, ...))
|
219 |
rcond(as(as(x, "dMatrix"), "dgeMatrix"), norm=norm, ...))
|
| 220 |
|
220 |
|
| 221 |
setMethod("symmpart", signature(x = "denseMatrix"),
|
221 |
setMethod("symmpart", signature(x = "denseMatrix"),
|
| 222 |
function(x) symmpart(as(x, "dMatrix")))
|
222 |
function(x) symmpart(as(x, "dMatrix")))
|
| 223 |
setMethod("skewpart", signature(x = "denseMatrix"),
|
223 |
setMethod("skewpart", signature(x = "denseMatrix"),
|
| 224 |
function(x) skewpart(as(x, "dMatrix")))
|
224 |
function(x) skewpart(as(x, "dMatrix")))
|