# NOT RUN {
data(agriculture)
## Compute the dissimilarities using Euclidean metric and without
## standardization
daisy(agriculture, metric = "euclidean", stand = FALSE)
## 2nd plot is similar to Figure 3 in Struyf et al (1996)
plot(pam(agriculture, 2))
## Plot similar to Figure 7 in Struyf et al (1996)
# }
# NOT RUN {
plot(agnes(agriculture), ask = TRUE)
# }
# NOT RUN {
## Plot similar to Figure 8 in Struyf et al (1996)
# }
# NOT RUN {
plot(diana(agriculture), ask = TRUE)
# }
Run the code above in your browser using DataLab