Audit representation quality across a SOM ensemble
Examples
data <- simulate_som_scenario("clusters", n = 45, p = 3, seed = 1)
specification <- som_spec(c(3, 2), seeds = 1:2, rlen = 10, k = 2)
audit_som(fit_som_ensemble(data, specification, keep_models = FALSE))
#> <som_audit>
#> successful fits: 2
#> success rate : 100.0%
#> grids audited : 1