# roxygen generated flag
options(R_CHECK_RUNNING_EXAMPLES_=TRUE)
#----------
# connectivity,ANY-method
#----------
# clustering of random data
h <- hclust(dist(rmatrix(10,20)))
connectivity(cutree(h, 2))
#----------
# connectivity,factor-method
#----------
connectivity(gl(2, 4))
Run the code above in your browser using DataLab