Mercurial > repos > greg > ideas

changeset 114:c89bf5bf4661 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Uploaded
author greg
date Fri, 17 Nov 2017 09:41:07 -0500
parents ba7238a53377
children 242ff1426fb4
files create_heatmap.R
diffstat 1 files changed, 1 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/create_heatmap.R	Wed Nov 15 08:58:11 2017 -0500
+++ b/create_heatmap.R	Fri Nov 17 09:41:07 2017 -0500
@@ -16,6 +16,7 @@
     l = dim(data_matrix)[1];
     p = (sqrt(9 + 8 * (k - 1)) - 3) / 2;
     m = as.matrix(data_matrix[,1+1:p]/data_matrix[,1]);
+    colnames(m) = colnames(data_matrix)[1+1:p];
     marks = colnames(m);
     rownames(m) = paste(1:l-1," (", round(data_matrix[,1] / sum(data_matrix[,1]) * 10000) / 100, "%)", sep="");
     pdf(file=opt$output);