The R Project SVN R-packages

Rev

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

Rev 4738 Rev 5028
Line 100... Line 100...
100
setMethod("norm", signature(x = "dtrMatrix", type = "missing"),
100
setMethod("norm", signature(x = "dtrMatrix", type = "missing"),
101
	  function(x, type, ...)
101
	  function(x, type, ...)
102
	  .Call(dtrMatrix_norm, x, "O"),
102
	  .Call(dtrMatrix_norm, x, "O"),
103
	  valueClass = "numeric")
103
	  valueClass = "numeric")
104
 
104
 
105
setMethod("rcond", signature(x = "dtrMatrix", type = "character"),
105
setMethod("rcond", signature(x = "dtrMatrix", norm = "character"),
106
	  function(x, type, ...)
106
	  function(x, norm, ...)
107
	  .Call(dtrMatrix_rcond, x, type),
107
	  .Call(dtrMatrix_rcond, x, norm),
108
	  valueClass = "numeric")
108
	  valueClass = "numeric")
109
 
109
 
110
setMethod("rcond", signature(x = "dtrMatrix", type = "missing"),
110
setMethod("rcond", signature(x = "dtrMatrix", norm = "missing"),
111
	  function(x, type, ...)
111
	  function(x, norm, ...)
112
	  .Call(dtrMatrix_rcond, x, "O"),
112
	  .Call(dtrMatrix_rcond, x, "O"),
113
	  valueClass = "numeric")
113
	  valueClass = "numeric")
114
 
114
 
115
setMethod("solve", signature(a = "dtrMatrix", b="missing"),
115
setMethod("solve", signature(a = "dtrMatrix", b="missing"),
116
	  function(a, b, ...)
116
	  function(a, b, ...)