... | ... |
@@ -100,5 +100,6 @@ annot <- data.frame( |
100 | 100 |
labs = sample(c("A","B","C","D"), size = ncol(mat), replace = TRUE), |
101 | 101 |
row.names = colnames(mat) |
102 | 102 |
) |
103 |
+ins <- list(mat = mat, annotation_col = annot) |
|
103 | 104 |
do.call(ComplexHeatmap::pheatmap, ins[1]) |
104 | 105 |
do.call(ComplexHeatmap::pheatmap, ins) |