Hi, everyone,
I am trying to highlight a group of samples at a cluster (dendogram).
I would like to do it setting a group name in bold (the group "Para").
It is a large series, but I have a sampler above:
# Library
library(cluster)
library(png)
# Generating table1:
table1 <- (cbind(rbind("Para", "Tumor",
"Normal", "Para", "Tumor",
"Normal"), rbind(0.2, 6.4,2.3, 0.5, 1.5, 4.4), rbind(2.1, 2.14,1.0,
5.5,
0.3, 3.5), rbind(0.2, 1.4,2.2, 0.1, 1.9, 1.0),rbind(3.2, 6.4,2.3, 3.5,
10.5, 4.4), rbind(1.27, 0.9,1.7,1.2,1.5, 2.4) ))
names = as.matrix(table1[,1])
rownames(table1) <- names
table1 <- (table1[,2:6])
table1 = apply(table1, 1,as.numeric)
# Cluster and Plot
cluster = agnes(t(table1), metric = "manhattan", stand = T, method =
"ward")
plot(cluster, main="", xlab="")
I would like that the group "Para" at this plot appears on bold.
Is
it possible using plot?
Thank you very much, Leandro
[[alternative HTML version deleted]]