# sample data
data(data20)
# creating an object with results of hierarchical clustering of
hca.object <- nomclust(data20, measure = "lin", method = "average",
clu.high = 5, prox = TRUE)
# nomclust plot
plot(hca.object)
# obtaining the agnes, twins object
hca.object.agnes <- as.agnes(hca.object)
# agnes plot
plot(hca.object.agnes)
# obtaining the hclust object
hca.object.hclust <- as.hclust(hca.object)
# hclust plot
plot(hca.object.hclust)
Run the code above in your browser using DataLab