[R] matrixMultiplication & labels

[chr.schulz@email.de]

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
_._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._