The R Project SVN R-packages

Rev

Rev 3176 | Rev 3309 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 3176 Rev 3182
Line 20... Line 20...
20 
\alias{chol,lsCMatrix,logical-method}
 20 
\alias{chol,lsCMatrix,logical-method}
21 
\alias{chol,lsCMatrix,missing-method}
 21 
\alias{chol,lsCMatrix,missing-method}
22 
 
 22 
 
23 
\alias{coerce,lgCMatrix,dgCMatrix-method}
 23 
\alias{coerce,lgCMatrix,dgCMatrix-method}
24 
\alias{coerce,lgCMatrix,lgTMatrix-method}
 24 
\alias{coerce,lgCMatrix,lgTMatrix-method}
- 
 
 25 
\alias{coerce,lgCMatrix,lgeMatrix-method}
25 
\alias{coerce,lgCMatrix,matrix-method}
 26 
\alias{coerce,lgCMatrix,matrix-method}
26 
\alias{coerce,lgTMatrix,dgTMatrix-method}
 27 
\alias{coerce,lgTMatrix,dgTMatrix-method}
27 
\alias{coerce,lgTMatrix,lgCMatrix-method}
 28 
\alias{coerce,lgTMatrix,lgCMatrix-method}
28 
\alias{coerce,lgTMatrix,matrix-method}
 29 
\alias{coerce,lgTMatrix,matrix-method}
29 
\alias{coerce,lsCMatrix,dgTMatrix-method}
 30 
\alias{coerce,lsCMatrix,dgTMatrix-method}
Line 128... Line 129...
128 
}
 129 
}
129 
\examples{
 130 
\examples{
130 
m <- Matrix(c(0,0,2:0), 3,5, dimnames=list(LETTERS[1:3],NULL))
 131 
m <- Matrix(c(0,0,2:0), 3,5, dimnames=list(LETTERS[1:3],NULL))
131 
(dm <- as(m, "dgCMatrix"))# no dimnames for sparse here
 132 
(dm <- as(m, "dgCMatrix"))# no dimnames for sparse here
132 
(lm <- as(dm, "lgCMatrix"))
 133 
(lm <- as(dm, "lgCMatrix"))
133 
str(lm)
 134 
str(lm) # no 'x' slot
- 
 
 135 
!lm     # no longer sparse
134 
 
 136 
 
135 
data(KNex)
 137 
data(KNex)
136 
lmm <- as(KNex $ mm, "lgCMatrix")
 138 
lmm <- as(KNex $ mm, "lgCMatrix")
137 
xlx <- crossprod(lmm)
 139 
xlx <- crossprod(lmm)
138 
image(xlx, main=paste("crossprod(lmm) : Sparse", class(xlx)))
 140 
image(xlx, main=paste("crossprod(lmm) : Sparse", class(xlx)))