add

xjsun1221 · Feb 8, 2021 · b6edf57 · b6edf57
1 parent 706c395
commit b6edf57
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 3 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,7 +1,7 @@
 Package: tinyarray
 Type: Package
 Title: simplify geo and tcga analysis and plots
-Version: 2.0.2
+Version: 2.0.3
 Author: Xiaojie Sun
 Maintainer: Xiaojie Sun <18763899370@163.com>
 Description: Simplify geo and tcga analysis and plots

diff --git a/R/1_plots.R b/R/1_plots.R
@@ -116,8 +116,7 @@ draw_heatmap <-  function(n,
   rownames(annotation_col)=colnames(n)
   col = color_an[1:length(levels(group_list))]
   ann_colors = list(group = col)
-  names(ann_colors$group)=levels(group_list)
-
+  if(is.null(names(ann_colors$group)))names(ann_colors$group)=levels(group_list)
   if(!scale_before){
     p = pheatmap(n,
              show_colnames =F,