Running examples in 'anticlust-Ex.R' failed
The error most likely occurred in:

> ### Name: anticlustering
> ### Title: Anticlustering
> ### Aliases: anticlustering
> 
> ### ** Examples
> 
> 
> # Use default method ("exchange") and the default diversity criterion, also include
> # a categorical variable via argument `categories`:
> anticlusters <- anticlustering(
+   schaper2019[, 3:6],
+   K = 3,
+   categories = schaper2019$room
+ )
> # Compare feature means and standard deviations by anticluster
> mean_sd_tab(schaper2019[, 3:6], anticlusters)
  rating_consistent rating_inconsistent syllables     frequency     
1 "4.50 (0.23)"     "1.10 (0.07)"       "3.47 (0.95)" "18.34 (2.40)"
2 "4.49 (0.27)"     "1.12 (0.07)"       "3.41 (0.87)" "18.28 (2.47)"
3 "4.49 (0.25)"     "1.10 (0.05)"       "3.38 (0.98)" "18.31 (2.36)"
> # Verify that the "room" is balanced across anticlusters:
> table(anticlusters, schaper2019$room)
            
anticlusters bathroom kitchen
           1       16      16
           2       16      16
           3       16      16
> 
> # Use multiple starts of the algorithm to improve the objective and
> # optimize the k-means criterion ("variance")
> anticlusters <- anticlustering(
+   schaper2019[, 3:6],
+   objective = "variance",
+   K = 3,
+   categories = schaper2019$room,
+   method = "local-maximum", # better search algorithm
+   repetitions = 20 # multiple restarts of the algorithm 
+ )
> # Compare means and standard deviations by anticluster
> mean_sd_tab(schaper2019[, 3:6], anticlusters)
  rating_consistent rating_inconsistent syllables     frequency     
1 "4.49 (0.26)"     "1.10 (0.07)"       "3.41 (0.91)" "18.31 (2.47)"
2 "4.49 (0.25)"     "1.10 (0.06)"       "3.44 (0.95)" "18.31 (2.39)"
3 "4.49 (0.25)"     "1.10 (0.07)"       "3.41 (0.95)" "18.31 (2.38)"
> 
> # Use different group sizes and optimize the extended k-means
> # criterion ("kplus")
> anticlusters <- anticlustering(
+   schaper2019[, 3:6],
+   objective = "kplus",
+   K = c(24, 24, 48),
+   categories = schaper2019$room,
+   repetitions = 20,
+   method = "local-maximum",
+   standardize = TRUE # ususally recommended
+ )
> 
> # Use cannot_link constraints: Element 1 must not be linked with elements 2 to 10:
> cl_matrix <- matrix(c(rep(1, 9), 2:10), ncol = 2)
> cl <- anticlustering(
+   schaper2019[, 3:6],
+   K = 10,
+   cannot_link = cl_matrix
+ )
Error in as.data.frame.integer(x[[i]], optional = TRUE) : 
  row names contain missing values
Calls: anticlustering ... data.frame -> as.data.frame -> as.data.frame.integer
Execution halted