# NOT RUN {
data <- iris[, 1:4] #Take only numerical columns
#Perform k-means clustering
model <- whibo_clustering(data = data, k = 3)
model
#Perform some unorthodox clustering
model <- whibo_clustering(data = data, k = 3,
normalization_type = 'Z', cluster_initialization_type = 'Ward',
assignment_type = 'Correlation', recalculation_type = 'Trimean')
# }
Run the code above in your browser using DataLab