Ensuring clustering is on/off same as in original examples.

saezlab · Jul 21, 2024 · 701357c · 701357c
1 parent a9632fb
commit 701357c
Showing 1 changed file with 8 additions and 1 deletion.
diff --git a/vignettes/decoupleR.Rmd b/vignettes/decoupleR.Rmd
@@ -116,9 +116,10 @@ colors.use <- grDevices::colorRampPalette(colors = colors)(100)
 pheatmap::pheatmap(mat = mat,
                    color = colors.use,
                    border_color = "white",
+                   cluster_rows = FALSE,
+                   cluster_cols = FALSE,
                    cellwidth = 15,
                    cellheight = 15,
-                   cutree_cols = 2,
                    treeheight_row = 0,
                    treeheight_col = 0)
 ```
@@ -229,6 +230,8 @@ colors.use <- grDevices::colorRampPalette(colors = colors)(100)
 pheatmap::pheatmap(mat = mat_gsea,
                    color = colors.use,
                    border_color = "white",
+                   cluster_rows = FALSE,
+                   cluster_cols = FALSE,
                    cellwidth = 20,
                    cellheight = 20,
                    treeheight_row = 0,
@@ -262,6 +265,8 @@ colors.use <- grDevices::colorRampPalette(colors = colors)(100)
 pheatmap::pheatmap(mat = mat_ulm,
                    color = colors.use,
                    border_color = "white",
+                   cluster_rows = FALSE,
+                   cluster_cols = FALSE,
                    cellwidth = 20,
                    cellheight = 20,
                    treeheight_row = 0,
@@ -308,6 +313,8 @@ colors.use <- grDevices::colorRampPalette(colors = colors)(100)
 pheatmap::pheatmap(mat = mat_consensus,
                    color = colors.use,
                    border_color = "white",
+                   cluster_rows = FALSE,
+                   cluster_cols = FALSE,
                    cellwidth = 20,
                    cellheight = 20,
                    treeheight_row = 0,