Displaying 1 result from an estimated 1 matches for "rt100".
Did you mean:
vt100
2011 Jun 09
0
How to shift the heat map
...they are missing
#
tryCatch(library(gplots), error=function(err)
# if this produces an error:
install.packages("gplots",repos="http://cran.ms.unimelb.edu.au/"))
# Prepare the data matrix
par(omi=c(1,1,1,1))
# Read in the .csv file
data<-read.csv("MEAN PERAK RT100 300-399.csv", header = TRUE, row.names=1)
boxplot(data)
heatmap_data<- data[,-1]
colnames(heatmap_data) <- if
(length(grep("^X[\\d]",colnames(heatmap_data),perl=TRUE)) != 0) # then
{gsub("^X([\\d].*)","\\1",colnames(heatmap_data),perl=TRUE)} else...