### Name: diana.object
### Title: Divisive Analysis (DIANA) Object
### Aliases: diana.object
### Keywords: cluster

### ** Examples

## really see example(diana) !   Additionally:
data(votes.repub)
dv0 <- diana(votes.repub, stand = TRUE)
## Cut into 2 groups:
dv2 <- cutree(as.hclust(dv0), k = 2)
table(dv2)
rownames(votes.repub)[dv2 == 1]