Hi,
have anybody an idea, how i can header my res-matrix automatic
(i.e. first column get the header (name) "a.high*a.medium") , first
for ckeck the matrixMultiplication later for better reading.
thanks regards,Christian
P.S. When i have a matrix with ~ 500 cases instead of 4 i get
problems with my memory allocation (192 MB RAM Win2000) - what can i do
,because
this is a step for mining associationsRules what should happen in large
datasets, too ?
zz <- apply(outer(t(dm),dm),c(1,4),function(dm)list(diag(dm)))
res <- matrix(unlist(zz[upper.tri(zz)]),nrow=nrow(dm))
$ dm
a.high a.medium a.low b.high b.medium b.low c.high c.medium c.low
[1,] 0.3 0.5 0.2 0.1 0.3 0.6 0.1 0.3 0.6
[2,] 0.2 0.6 0.2 0.7 0.1 0.2 0.7 0.1 0.2
[3,] 0.3 0.1 0.6 0.3 0.2 0.5 0.3 0.2 0.5
[4,] 0.4 0.3 0.3 0.8 0.1 0.1 0.8 0.1 0.1
$ res
[,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10] [,11] [,12] [,13] [,14]
[1,] 0.15 0.06 0.10 0.03 0.05 0.02 0.09 0.15 0.06 0.03 0.18 0.30 0.12 0.06
[2,] 0.12 0.04 0.12 0.14 0.42 0.14 0.02 0.06 0.02 0.07 0.04 0.12 0.04 0.14
[3,] 0.03 0.18 0.06 0.09 0.03 0.18 0.06 0.02 0.12 0.06 0.15 0.05 0.30 0.15
[4,] 0.12 0.12 0.09 0.32 0.24 0.24 0.04 0.03 0.03 0.08 0.04 0.03 0.03 0.08
[,15] [,16] [,17] [,18] [,19] [,20] [,21] [,22] [,23] [,24] [,25] [,26]
[1,] 0.18 0.03 0.05 0.02 0.01 0.03 0.06 0.09 0.15 0.06 0.03 0.09
[2,] 0.02 0.14 0.42 0.14 0.49 0.07 0.14 0.02 0.06 0.02 0.07 0.01
[3,] 0.10 0.09 0.03 0.18 0.09 0.06 0.15 0.06 0.02 0.12 0.06 0.04
[4,] 0.01 0.32 0.24 0.24 0.64 0.08 0.08 0.04 0.03 0.03 0.08 0.01
[,27] [,28] [,29] [,30] [,31] [,32] [,33] [,34] [,35] [,36]
[1,] 0.18 0.03 0.18 0.30 0.12 0.06 0.18 0.36 0.06 0.18
[2,] 0.02 0.07 0.04 0.12 0.04 0.14 0.02 0.04 0.14 0.02
[3,] 0.10 0.06 0.15 0.05 0.30 0.15 0.10 0.25 0.15 0.10
[4,] 0.01 0.08 0.04 0.03 0.03 0.08 0.01 0.01 0.08 0.01
-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-
r-help mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
Send "info", "help", or "[un]subscribe"
(in the "body", not the subject !) To: r-help-request at
stat.math.ethz.ch
_._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._