# Set file path
filepath <- system.file("extdata", package = "FishDiveR")
# Load kmeans_data
kmeans_data <- readRDS(file.path(filepath, "data/5_k-means/combined_stats.rds"))
# \donttest{
# Full example using the complete dataset.
# Set output to TRUE for real use!
kmeans_result <- k_clustering(
kmeans_data = kmeans_data,
standardise = TRUE,
k = 4,
nstart = 50,
polygon = FALSE,
output = FALSE,
output_folder = tempdir(),
verbose = TRUE
)
# }
Run the code above in your browser using DataLab