SCM

SCM Repository

[matrix] View of /pkg/tests/rowcolOps.R
ViewVC logotype

View of /pkg/tests/rowcolOps.R

Parent Directory Parent Directory | Revision Log Revision Log


Revision 714 - (download) (annotate)
Fri May 6 23:52:34 2005 UTC (14 years, 3 months ago) by bates
File size: 290 byte(s)
Added colSums and friends for dgeMatrix class
library(Matrix)

set.seed(321)
mm <- Matrix(round(rnorm(1000), 2), 50, 20)
m1 <- as(mm, "matrix")
stopifnot(all.equal(colMeans(mm), colMeans(m1)),
          all.equal(colSums(mm), colSums(m1)),
          all.equal(rowMeans(mm), rowMeans(m1)),
          all.equal(rowSums(mm), rowSums(m1)))

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