Certifies that, given enough points, no clusters are left empty. This is done
by removing a point from the largest cluster and adding it to an empty
cluster while there are empty clusters. If the total number of points is
smaller than the number of clusters (or if the allow_empty
parameter is set
to TRUE
), this function does nothing.
Arguments
- clu_num_points
Number of points in each cluster (vector of size \(c\)), where \(c\) is the number of clusters.
- allow_empty
Allow empty clusters?
Details
This function is used internally by clusizes and might be useful for custom
cluster sizing implementations given as the clusizes_fn
parameter of the
main clugen function.
Examples
clusters <- c(3, 4, 5, 0, 0) # A vector with some empty elements
clusters <- fix_empty(clusters) # Apply this function
clusters # Check that there's no more empty elements
#> [1] 3 3 4 1 1