加载R包
r
# install.packages("gplots")
library("gplots")
数据
r
mat <- matrix(rnorm(1200), ncol=6)
画图1
r
heatmap.2(x=mat)
画图2
r
heatmap.2(x=mat,
Colv=FALSE,
dendrogram="row",
scale="row",
col="bluered",
trace="none",
ColSideColors=rep(c("green","orange"), each=3),
labRow=FALSE,
main="my heatmap",
ylab="Genes",
xlab="Samples")