SCM

SCM Repository

[matrix] Diff of /pkg/tests/matprod.R
ViewVC logotype

Diff of /pkg/tests/matprod.R

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1672, Mon Nov 6 20:25:10 2006 UTC revision 1673, Mon Nov 6 20:54:26 2006 UTC
# Line 115  Line 115 
115  stopifnot(identical(as.mat(bb), rbind(0, c(1,0,0))))  stopifnot(identical(as.mat(bb), rbind(0, c(1,0,0))))
116  if(FALSE)## FIXME: use fully-sparse cholmod_spsolve() based solution !!  if(FALSE)## FIXME: use fully-sparse cholmod_spsolve() based solution !!
117  z.s <- solve(B2, bb)  z.s <- solve(B2, bb)
118    ## -> dense RHS and dense result
119  z. <- solve(as(B2, "dgCMatrix"), bb)  z. <- solve(as(B2, "dgCMatrix"), bb)
120  z  <- solve( B2, as(bb,"dgeMatrix"))  z  <- solve( B2, as(bb,"dgeMatrix"))
121  stopifnot(identical(z, z.))  stopifnot(identical(z, z.))

Legend:
Removed from v.1672  
changed lines
  Added in v.1673

root@r-forge.r-project.org
ViewVC Help
Powered by ViewVC 1.0.0  
Thanks to:
Vienna University of Economics and Business Powered By FusionForge