我想将这些样本进行聚类分析，从数据进行聚类，看是否通过这些数据可将样本分成几类，不知怎样做，并且不知怎样将样本分好的类用不同的颜色表示patientcolors，请各位大神赐教！
library("ALL")
library(gplots)
require(graphics);require(grDevices)
data<-read.csv("E:\\R data\\后续分析\\16 pairs dealed data\\lnc T vs C subset larger 2 times.csv",header=T)
data1<-data[,25:40]
y<-as.matrix(data1)
png(file="lnc heatmap class predict.png", bg="transparent",width=600, height=600)

hv <- heatmap.2(y, col =greenred(75), scale = "column",
             labRow=F,
key=TRUE, symkey=FALSE, density.info="none", trace="none", cexRow=0.5)
dev.off()