search for: finalmap

...ename,header=TRUE) #isolate row/col frequencies as a matrix. we need to look at # both to get the complete list of pairs and their respective frequencies xtable<-table(x$X.var) ytable<-table(x$Y.var) #map frequencies of X & Y vars to rows xmap<-xtable[x$X.var] ymap<-ytable[x$Y.var] finalmap<-order(xmap,-ymap,decreasing=TRUE) #fill in matrix - we want the third column for MIC z<-diag(length(levels(x$X.var))+1) z[row(z)>col(z)]<-x[finalmap,3] z<-z+t(z) diag(z)<-1 #determine and set row/column names varnames<-c(names(sort(xtable,decreasing=TRUE)),names(sort(ytable,de...