|
@ -79,6 +79,9 @@ fragments <- max(table[, columns.spectra]) |
|
|
|
|
|
|
|
|
# set use_cores to safe amount |
|
|
# set use_cores to safe amount |
|
|
use_cores = min(use_cores, detectCores() - 1) |
|
|
use_cores = min(use_cores, detectCores() - 1) |
|
|
|
|
|
if (.Platform$OS.type == "windows") { |
|
|
|
|
|
use_cores=1L |
|
|
|
|
|
} |
|
|
|
|
|
|
|
|
# lower bound of indices per fragment |
|
|
# lower bound of indices per fragment |
|
|
# (sorting guarantees that data points of same fragment are together) |
|
|
# (sorting guarantees that data points of same fragment are together) |
|
|