Displaying 3 results from an estimated 3 matches for "mydatascale".
2010 Sep 22
0
How to Ignore NaN values in Rows when using hclust function in making Heatmap??
...am not familiar with R and this is the first time I am using it).
library("gplots")
library("Cairo")
mydata <- read.csv(file="data.csv", header=TRUE, sep=",")
rownames(mydata)=mydata$Name
mydata <- mydata[,2:297]
mydatamatrix <- data.matrix(mydata)
mydatascale <- t(scale(t(mydatamatrix)))
hr <- hclust(as.dist(1-cor(t(mydatascale), method="pearson")),
method="complete")
hc <- hclust(as.dist(1-cor(mydatascale, method="spearman")),
method="complete")
myclhr <- cutree(hr, h=max(hr$height)/2); mycolhr <-...
2010 Sep 08
1
saving heatmaps in graphical format that can be edited in graphic editor tool
...tmap in R using the following commands:
> mydata <- read.csv(file="Data.csv", header=TRUE, sep=",")
> mydata <- mydata[rowSums(mydata[,-1]^2) >0, ]
> rownames(mydata)=mydata$Name
> mydata <- mydata[,2:253]
> mydatamatrix <- data.matrix(mydata)
> mydatascale <- t(scale(t(mydatamatrix)))
> hr <- hclust(as.dist(1-cor(t(mydatascale), method="pearson")),
> method="complete")
> hc <- hclust(as.dist(1-cor(mydatascale, method="spearman")),
> method="complete")
> myclhr <- cutree(hr, h=max(hr$h...
2010 Sep 08
2
saving heatmaps in graphical format that can be edited in graphic editor tools
...tmap in R using the following commands:
> mydata <- read.csv(file="Data.csv", header=TRUE, sep=",")
> mydata <- mydata[rowSums(mydata[,-1]^2) >0, ]
> rownames(mydata)=mydata$Name
> mydata <- mydata[,2:253]
> mydatamatrix <- data.matrix(mydata)
> mydatascale <- t(scale(t(mydatamatrix)))
> hr <- hclust(as.dist(1-cor(t(mydatascale), method="pearson")),
method="complete")
> hc <- hclust(as.dist(1-cor(mydatascale, method="spearman")),
method="complete")
> myclhr <- cutree(hr, h=max(hr$height)/2);...