Agglomerative hierarchical clustering (Geron Ch 8, morie.fn hmagc)

Clusters are numbered by the index of their lowest-indexed member, so labels is deterministic regardless of merge order. merges entries are 0-based (min member of a, min member of b).

Usage

morie_geron_agglomerative(X, n_clusters = 2, linkage = "single")

Arguments

X

Observations (n, d).

n_clusters

Stop count.

linkage

"single", "complete", "average" or "centroid".

Value

List with labels, merges, heights, n_clusters, distances.

Examples

V <- c(1, 2, 3, 4, 5, 6, 7, 8)
morie_geron_agglomerative(V)
#> $labels
#> [1] 0 0 0 0 0 0 0 1
#> 
#> $merges
#> $merges[[1]]
#> [1] 0 1
#> 
#> $merges[[2]]
#> [1] 0 2
#> 
#> $merges[[3]]
#> [1] 0 3
#> 
#> $merges[[4]]
#> [1] 0 4
#> 
#> $merges[[5]]
#> [1] 0 5
#> 
#> $merges[[6]]
#> [1] 0 6
#> 
#> 
#> $heights
#> [1] 1 1 1 1 1 1
#> 
#> $n_clusters
#> [1] 2
#> 
#> $linkage
#> [1] "single"
#> 
#> $distances
#>      [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8]
#> [1,]    0    1    2    3    4    5    6    7
#> [2,]    1    0    1    2    3    4    5    6
#> [3,]    2    1    0    1    2    3    4    5
#> [4,]    3    2    1    0    1    2    3    4
#> [5,]    4    3    2    1    0    1    2    3
#> [6,]    5    4    3    2    1    0    1    2
#> [7,]    6    5    4    3    2    1    0    1
#> [8,]    7    6    5    4    3    2    1    0
#> 
#> $estimate
#> [1] 1
#> 
#> $n
#> [1] 8
#> 
#> $method
#> [1] "Agglomerative clustering with single linkage"
#>