WISH: parallelly::availableCores() instead of parallel::detectCores()

[HenrikBengtsson]

(disclaim: I'm the author) To minimize the risk of overusing CPUs on multi-tenant and multi-process machines, but also to work in more environments, please consider changing:

finnts/R/general_parallel.R

Lines 6 to 13 in 57207bf

	get_cores <-function(num_cores){
	if(is.null(num_cores)) {
	parallel::detectCores()-1
	} else {
	min(num_cores, parallel::detectCores()-1)
	}
	}

to

 get_cores <-function(num_cores){  
   min(c(parallelly::availableCores(omit = 1), num_cores))
 }

This also has the benefit of working on single-core hosts, where detectCores() == 1, e.g. free RStudio Cloud accounts, some k8s/container setups, etc. For more arguments, see https://parallelly.futureverse.org/#availablecores-vs-paralleldetectcores.

[mitokic]

Hey Henrik, thanks for reaching out. I'll look more into this and incorporate into package soon. Our main focus right now is to build out new parallel compute options like spark.