# Example distance matrix (3 points)
dist_matrix <- matrix(c(0, 2, 5,
2, 0, 3,
5, 3, 0), ncol = 3)
# Select 2 points maximizing distance
result <- select_target_points(dist_matrix, target_points = 2,
thin_dist = 4, trials = 5, all_trials = TRUE)
Run the code above in your browser using DataLab