240 發(fā)簡信
IP屬地:廣東
  • #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é)者太難了

亚洲A日韩AV无卡,小受高潮白浆痉挛av免费观看,成人AV无码久久久久不卡网站,国产AV日韩精品