hollorol/RBBGCMuso
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

skipable thread copying

Browse Source
This commit is contained in:
Hollos Roland 2021-04-21 06:21:52 +02:00
parent 45ade3a9bd
commit 1b66f6e10c
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
RBBGCMuso/R/multiSite.R
View File

@ -39,7 +39,9 @@ multiSiteCalib <- function(measurements,
thread_prefix="thread",
numCores = (parallel::detectCores()-1),
pb = txtProgressBar(min=0, max=iterations, style=3),
pbUpdate = setTxtProgressBar){
pbUpdate = setTxtProgressBar,
copyThread = TRUE
){
future::plan(future::multisession)
# file.remove(list.files(path = "tmp", pattern="progress.txt", recursive = TRUE, full.names=TRUE))
@ -51,8 +53,9 @@ multiSiteCalib <- function(measurements,
# | | | '__/ _ \/ _` | __/ _ \ | __| '_ \| '__/ _ \/ _` |/ _` / __|
# | |___| | | __/ (_| | || __/ | |_| | | | | | __/ (_| | (_| \__ \
# \____|_| \___|\__,_|\__\___| \__|_| |_|_| \___|\__,_|\__,_|___/
copyToThreadDirs2(iniSource=calTable$site_id, numCores=numCores, execPath=execPath)
if(copyThread){
copyToThreadDirs2(iniSource=calTable$site_id, numCores=numCores, execPath=execPath)
}
# ____ _ _ _
# | _ \ _ _ _ __ | |_| |__ _ __ ___ __ _ __| |___