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
ltCMatrix.R
#### Logical Sparse Triangular Matrices in Compressed column-oriented format
### contains = "lsparseMatrix"
setAs("ltCMatrix", "dtCMatrix",
function(from) new("dtCMatrix", i = from@i, p = from@p,
x = rep(1, length(from@i)), uplo = from@uplo,
diag = from@diag,
Dim = from@Dim, Dimnames = from@Dimnames))
setMethod("image", "ltCMatrix",
function(x, ...) {
x <- as(as(x, "dtCMatrix"), "dgTMatrix")
callGeneric()
})
setMethod("t", signature(x = "ltCMatrix"),
function(x) .Call("ltCMatrix_trans", x),
valueClass = "ltCMatrix")
![swh spinner](/static/img/swh-spinner.gif)
Computing file changes ...