From: Benjamin Auder Date: Fri, 10 Mar 2017 11:38:09 +0000 (+0100) Subject: 'update' X-Git-Url: https://git.auder.net/variants/Chakart/pieces/img/doc/css/rpsls.css?a=commitdiff_plain;h=bccecb19b4faa20808dab761d30f2d2dd4dcf587;p=epclust.git 'update' --- diff --git a/epclust/R/main.R b/epclust/R/main.R index cbc92b1..31ce390 100644 --- a/epclust/R/main.R +++ b/epclust/R/main.R @@ -304,8 +304,8 @@ claws <- function(getSeries, K1, K2, nb_per_chunk, if (WER=="mix") { indices = seq_len(ntasks*K2) - # Now series must be retrieved from synchrones_file - getSeries = function(inds) getDataInFile(inds, synchrones_file, nbytes, endian) + # Now series (synchrones) must be retrieved from medoids_file + getSeries = function(inds) getDataInFile(inds, medoids_file, nbytes, endian) # Contributions must be re-computed unlink(contribs_file) index = 1 @@ -316,6 +316,9 @@ claws <- function(getSeries, K1, K2, nb_per_chunk, contribs_file, nb_series_per_chunk, nbytes, endian) } +#TODO: check THAT + + # Run step2 on resulting indices or series (from file) if (verbose) cat("...Run final // stage 1 + stage 2\n")