The R Project SVN R-packages

Rev

Rev 5003 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5003 Rev 5028
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")))