### Name: iris
### Title: Edgar Anderson's Iris Data
### Aliases: iris iris3
### Keywords: datasets

### ** Examples

dni3 <- dimnames(iris3)
ii <- data.frame(matrix(aperm(iris3, c(1,3,2)), ncol=4,
                        dimnames = list(NULL, sub(" L.",".Length",
                                        sub(" W.",".Width", dni3[[2]])))),
                 Species = gl(3, 50,
                             labels=sub("S", "s", sub("V", "v", dni3[[3]]))))
all.equal(ii, iris) # TRUE



