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

result -> results

Browse Source
This commit is contained in:
Roland Hollós 2022-11-08 09:33:01 +01:00
parent 942a8603f9
commit 91ab92d02d
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
RBBGCMuso/R/calibrateMuso.R
View File

@ -114,7 +114,7 @@ calibrateMuso <- function(measuredData, parameters =read.csv("parameters.csv", s
resultFiles <- list.files(pattern="preservedCalib.*csv$",recursive=TRUE)
res0 <- read.csv(grep("thread_1/",resultFiles, value=TRUE),stringsAsFactors=FALSE)
if(numCores==1){
result <- res0
results <- res0
} else {
resultFilesSans0 <- grep("thread_1/", resultFiles, value=TRUE, invert=TRUE)
# results <- do.call(rbind,lapply(resultFilesSans0, function(f){read.csv(f, stringsAsFactors=FALSE)}))