Browse code

adjust the label of dendrogram layout

xiangpin authored on 20/07/2022 07:05:35
Showing1 changed files

... ...
@@ -100,7 +100,7 @@ ggplot_add.layout_ggtree <- function(object, plot, object_name) {
100 100
 
101 101
     if (object$layout == 'dendrogram') {
102 102
         plot <- revts(plot)
103
-        obj <- list(scale_x_reverse(labels = abs),
103
+        obj <- list(scale_x_reverse(labels = function(x){-x}),
104 104
                     coord_flip(clip = 'off')
105 105
                     )
106 106
     } else if (object$layout == 'circular' || object$layout == "inward_circular") {