# example 1
data(garlicdist)
garlic <- tocher(garlicdist)
attr(garlic, "distClust") # cluster distances
# example 2
data(USArrests)
usa <- tocher(dist(USArrests))
attr(usa, "distClust")
# example 3
data(eurodist)
euro <- tocher(eurodist)
attr(euro, "distClust")
# End (not run)Run the code above in your browser using DataLab