The following code implements some of the concepts of the paper:

Jun Wang, Bei Yu, and Les Gasser. 2002. Concept Tree Based Clustering Visualization with Shaded Similarity Matrices. In Proceedings of the 2002 IEEE International Conference on Data Mining (ICDM ’02). IEEE Computer Society, Washington, DC, USA.

library(seriation)
data(iris)

shuffle the data set

iris <- iris[sample(1:nrow(iris)),]

head(iris)
##     Sepal.Length Sepal.Width Petal.Length Petal.Width    Species
## 87           6.7         3.1          4.7         1.5 versicolor
## 75           6.4         2.9          4.3         1.3 versicolor
## 15           5.8         4.0          1.2         0.2     setosa
## 96           5.7         3.0          4.2         1.2 versicolor
## 148          6.5         3.0          5.2         2.0  virginica
## 124          6.3         2.7          4.9         1.8  virginica
plot(iris[,-5], col=iris[,5])