#breaks
bk <- seq(-9,9,0.01) # len: 1801
# 做熱圖:
pheatmap(data1,
scale = "none",
color = colorRampPalette(c("blue", "white", "red"))(length(bk)-1), # len: 1800
legend_breaks=seq(-9,9,1),
breaks=bk)
這樣更準(zhǔn)確更易懂,博主這個(gè)例子對(duì)初學(xué)者太難了
叉_9be2 評(píng)論自R語言pheatmap熱圖色條控制小技巧