R/comparClassif.R
comparClassif.Rd
Compare two classifications on all the Functional groups
comparClassif(classif1, classif2)
: list a length n_FG.
Adjusted Rand Index (ARI) for each Functional Group.
nFG <- 3; vK <- c(4,5,2) ; vNQ <- c(100,40,50); classif1 <- lapply(1:nFG,function(q){sample(1:vK[q],vNQ[q],replace=TRUE)}) classif2 <- classif1 classif2[[2]] <- sample(1:vK[2],vNQ[2],replace=TRUE) resCompar <- comparClassif (classif1,classif2)