# Computing the similarity matrix associated to 20 hierarchical clusterings
# using Normal projections.
M <- generate.sample0(n=10, m=2, sigma=2, dim=800)
l.norm <- Multiple.Random.hclustering (M, dim=100, pmethod="Norm", c=3,
hmethod="average", n=20)
Sim <- Do.similarity.matrix.partition(l.norm);
# The same as above, but with 30 hierarchical clusterings using PMO projections.
l.PMO <- Multiple.Random.hclustering (M, dim=100, pmethod="PMO", c=3,
hmethod="average", n=30)
Sim.PMO <- Do.similarity.matrix.partition(l.norm);
Run the code above in your browser using DataLab