SCM

SCM Repository

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

Diff of /pkg/tests/indexing.R

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

revision 2095, Wed Dec 5 17:57:24 2007 UTC revision 2096, Fri Dec 7 17:44:44 2007 UTC
# Line 249  Line 249 
249  stopifnot(is(T, "dtCMatrix"), identical(T[,3], c(10,10,10,0,0)))  stopifnot(is(T, "dtCMatrix"), identical(T[,3], c(10,10,10,0,0)))
250    
251    
252    ## "Vector indices" --- now ``work'' but wrongly __FIXME__
253    i <- c(1,3,6); v <- c(10,15,20)
254    D <- Diagonal(6)
255    m <- as(D,"matrix")
256    s <- as(D,"sparseMatrix")
257    
258    D[i] <- v; D
259    s[i] <- v; s
260    m[i] <- v; m
261    
262    
263  ## --- negative indices ----------  ## --- negative indices ----------
264  mc <- mC[1:5, 1:7]  mc <- mC[1:5, 1:7]
265  mt <- mT[1:5, 1:7]  mt <- mT[1:5, 1:7]

Legend:
Removed from v.2095  
changed lines
  Added in v.2096

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