R/cc_test_ari_permutation.R
cc_test_ari_permutation.Rd
A permutation test for testing the null hypothesis of random agreement (i.e., adjusted Rand Index equal to 0) between two partitions.
cc_test_ari_permutation(ground_truth, partition)
(int) A vector of the actual membership of elements in clusters
The partition coming from a clustering algorithm
A data_frame with two columns:
the adjusted Rand Index
the p-value of the test
Samuh M. H., Leisch F., and Finos L. (2014), Tests for Random Agreement in Cluster Analysis, Statistica Applicata-Italian Journal of Applied Statistics, vol. 26, no. 3, pp. 219-234.
L. Hubert and P. Arabie (1985) Comparing partitions, Journal of Classification, 2, 193-218.
library(CrossClustering)
clusters <- iris[-5] |>
dist() |>
hclust(method = 'ward.D') |>
cutree(k = 3)
ground_truth <- iris[[5]] |>
as.numeric()
cc_test_ari_permutation(ground_truth, clusters)
#> ari p_value
#> 1 0.7592 0.001