fix

rspatial · Dec 26, 2023 · aa0060d · aa0060d
1 parent f870298
commit aa0060d
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/k_means.R b/R/k_means.R
@@ -9,7 +9,7 @@ setMethod("k_means", signature(x="SpatRaster"),
 	function(x, centers=3, ..., maxcell=1000000, filename="", overwrite=FALSE, wopt=list()) {
 		stopifnot(maxcell > 0)
 		if (ncell(x) <= maxcell) {
-			v <- unique(na.omit(as.matrix(x)))
+			v <- values(x)
 			omit <- as.vector(attr(v, "na.action"))
 			km <- stats::kmeans(v, centers=centers, ...)
 			out <- rast(x, nlyr=1)