X-Git-Url: https://git.auder.net/?p=epclust.git;a=blobdiff_plain;f=epclust%2FR%2Fmain.R;h=4fdc5ae899c61aa3347e0aba1a843c12a5ecd012;hp=fe78e630b4dd1a697d62cbbe9d68a41bf125d050;hb=8546023eccc529272cf3e50f8dad17eed9d7b047;hpb=4a0c39a352d64561245966b1ee6b3a9ec6955227

diff --git a/epclust/R/main.R b/epclust/R/main.R
index fe78e63..4fdc5ae 100644
--- a/epclust/R/main.R
+++ b/epclust/R/main.R
@@ -292,7 +292,7 @@ claws <- function(series, K1, K2, nb_series_per_chunk, nb_items_clust=5*K1,
 	}
 
 	# As explained above, we obtain after all runs ntasks*[K1 or K2] medoids indices,
-	# depending wether WER=="end" or "mix", respectively.
+	# depending whether WER=="end" or "mix", respectively.
 	indices_medoids_all <-
 		if (parll && ntasks>1)
 			unlist( parallel::parLapply(cl, indices_tasks, runTwoStepClustering) )