library(pheatmap)

top_de_exp <- read.delim("wwh.heatmap.txt", header = TRUE, row.names = 1)



pheatmap(top_de_exp,
    scale = "row",
    color = colorRampPalette(c("#1569C7", "white", "#8e0303"))(200),
    cutree_rows = 2,
    fontsize_row = 12,
    fontsize_col = 16,
    show_rownames = TRUE
)

本文由mdnice多平台发布


染山
1 声望0 粉丝