Revision 19f0062d379d9a43a18a1dc7ddacd12c535fc08d authored by Douglas Bates on 04 July 2005, 00:00:00 UTC, committed by Gabor Csardi on 04 July 2005, 00:00:00 UTC
1 parent a3ce55b
dtTMatrix.R
### Coercion and Methods for Triangular Triplet Matrices
## Conversion to dense storage is first to a dtrMatrix
setAs("dtTMatrix", "dtrMatrix",
function(from) .Call("dtTMatrix_as_dtrMatrix", from))
setAs("dtTMatrix", "matrix",
function(from) as(as(from, "dtrMatrix"), "matrix"))
setAs("dtTMatrix", "dgeMatrix",
function(from) as(as(from, "dtrMatrix"), "dgeMatrix"))
setMethod("t", signature(x = "dtTMatrix"),
function(x)
new("dtTMatrix", Dim = rev(x@Dim), diag = x@diag,
i = x@j, j = x@i, x = x@x,
uplo = if (x@uplo == "U") "L" else "U"),
valueClass = "dtTMatrix")
Computing file changes ...