fix typo
authorBenjamin Auder <benjamin.auder@somewhere>
Wed, 15 Mar 2017 15:38:07 +0000 (16:38 +0100)
committerBenjamin Auder <benjamin.auder@somewhere>
Wed, 15 Mar 2017 15:38:07 +0000 (16:38 +0100)
epclust/R/main.R

index fe78e63..4fdc5ae 100644 (file)
@@ -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,
        }
 
        # 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) )
        indices_medoids_all <-
                if (parll && ntasks>1)
                        unlist( parallel::parLapply(cl, indices_tasks, runTwoStepClustering) )