Mercurial > repos > moheydarian > heatmap2

changeset 17:5d1db70d6df0 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Uploaded
author moheydarian
date Thu, 27 Apr 2017 13:38:20 -0400
parents ee0ff4253269
children 86da3fde9e5a
files heatmap2.R
diffstat 1 files changed, 9 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/heatmap2.R	Thu Apr 27 13:34:16 2017 -0400
+++ b/heatmap2.R	Thu Apr 27 13:38:20 2017 -0400
@@ -77,13 +77,17 @@
 }
 
 if(options$labels== "both"){
-  labs = NULL
+  rlabs = NULL
+  clabs = NULL
 }else if(options$labels== "rows"){
-  labs = labCol=FALSE
+  rlabs = NULL
+  clabs = labCol=FALSE
 }else if(options$labels== "columns"){
-  labs = labRow=FALSE
+  rlabs = labRow=FALSE
+  clabs = NULL
 }else if(options$labels== "none"){
-  labs = labRow=FALSE, labCol=FALSE
+  rlabs = labRow=FALSE
+  clabs = labCol=FALSE
 } else{
 }
 
@@ -93,7 +97,7 @@
 pdf(file="Rplot.pdf")
 colorscale
 heatmap.2(linput,
-          dclust, hclust, scale = options$scale,
+          dclust, hclust, scale = options$scale, rlabs,clabs,
           col=colfunc(50), trace="none", density.info = "none", labs, margins=c(8,2),
           main = options$title, key.xlab= options$key, keysize=1)
 dev.off()