data_x <- data.frame(
scientificName = "Mexacanthina lugubris",
decimalLongitude = c(-117, -117.8, -116.9),
decimalLatitude = c(32.9, 33.5, 31.9),
BO_sstmean = c(12, 13, 14),
BO_sstmin = c(9, 6, 10),
BO_sstmax = c(14, 16, 18)
)
result <- haversine_kmeans(
data_x,
latitude = "decimalLatitude",
longitude = "decimalLongitude",
k = 3
)
Run the code above in your browser using DataLab