mat <- matrix(rnorm(81), nrow = 9)
ggheatmap(mat) +
hmanno("top") +
align_dendro() &
theme(panel.border = element_rect(
colour = "red", fill = NA, linewidth = unit(2, "mm")
))
ggheatmap(mat) +
hmanno("top") +
align_dendro() -
theme(panel.border = element_rect(
colour = "red", fill = NA, linewidth = unit(2, "mm")
))
Run the code above in your browser using DataLab