The R Project SVN R-packages

Rev

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

Rev 5017 Rev 5028
Line 17... Line 17...
17 
setAs("matrix", "dspMatrix",
 17 
setAs("matrix", "dspMatrix",
18 
      function(from) as(as(from, "dsyMatrix"), "dspMatrix"))
 18 
      function(from) as(as(from, "dsyMatrix"), "dspMatrix"))
19 
 
 19 
 
20 
 
 20 
 
21 
 
 21 
 
22 
setMethod("rcond", signature(x = "dspMatrix", type = "character"),
 22 
setMethod("rcond", signature(x = "dspMatrix", norm = "character"),
23 
          function(x, type, ...)
 23 
          function(x, norm, ...)
24 
          .Call(dspMatrix_rcond, x, type),
 24 
          .Call(dspMatrix_rcond, x, norm),
25 
          valueClass = "numeric")
 25 
          valueClass = "numeric")
26 
 
 26 
 
27 
setMethod("rcond", signature(x = "dspMatrix", type = "missing"),
 27 
setMethod("rcond", signature(x = "dspMatrix", norm = "missing"),
28 
          function(x, type, ...)
 28 
          function(x, norm, ...)
29 
          .Call(dspMatrix_rcond, x, "O"),
 29 
          .Call(dspMatrix_rcond, x, "O"),
30 
          valueClass = "numeric")
 30 
          valueClass = "numeric")
31 
 
 31 
 
32 
setMethod("%*%", signature(x = "dspMatrix", y = "ddenseMatrix"),
 32 
setMethod("%*%", signature(x = "dspMatrix", y = "ddenseMatrix"),
33 
          function(x, y) .Call(dspMatrix_matrix_mm, x, y),
 33 
          function(x, y) .Call(dspMatrix_matrix_mm, x, y),