- index = which.min( rowSums( sweep(medoids, 2, series[i,], '-')^2 ) )
- synchrones[index,] = synchrones[index,] + series[i,]
- counts[index] = counts[index] + 1
+ for (i in seq_len(nrow(ref_series)))
+ {
+ j = which.min( rowSums( sweep(medoids, 2, series[i,], '-')^2 ) )
+ synchrones[j,] = synchrones[j,] + series[i,]
+ counts[j] = counts[j] + 1
+ }
+ index = index + nb_series_per_chunk