R中两个分区之间的距离

Question

我想知道如何计算R中同一个Universe的两个分区之间的Rand指数。

假设我的分区如下：

               fList <- list("1"=1:4, "2"=5:8, "3"=9:12, "4"=13:16, "5"=17:20)
               sList <- list("1"=1:6, "2"=7:9, "3"=10:12, "4"=13:16, "5"= 17:20)

我还没有使用cl_dissimilarity来计算兰德指数。我尝试以下操作均无济于事：

cl_dissimilarity(as.cl_ensemble(fList), as.cl_ensemble(sList), method = "Rand")

编辑：我刚刚找到一种简单的方法来完成手头的任务：

library(clues)

fVector <- c(rep(1,4), rep(2,4), rep(3,4), rep(4,4), rep(5,4))
sVector <- c(rep(1,6), rep(2,3), rep(3,3), rep(4,4), rep(5,4))

adjustedRand(fVector, sVector, randMethod="Rand")