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

copy epc

Browse Source
This commit is contained in:
Roland Hollós 2020-05-28 13:56:27 +02:00
parent 72935b75e1
commit c73d397dbe
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
RBBGCMuso/R/calibration.R
View File

@ -259,6 +259,7 @@ musoGlue <- function(presCalFile, w, delta = 0.17, settings=setupMuso(), paramet
write.csv(as.data.frame(optimalEpc),"epcOptim.csv") write.csv(as.data.frame(optimalEpc),"epcOptim.csv")
print(head(optRanges,n=-2)) print(head(optRanges,n=-2))
calibMuso(calibrationPar=optimalEpc[[1]],parameters=optimalEpc[[2]]) calibMuso(calibrationPar=optimalEpc[[1]],parameters=optimalEpc[[2]])
file.copy(settings$epcInput[2],"epcOptim.epc")
} }
generateOptEpc <- function(optRanges,delta, maxLikelihood=FALSE){ generateOptEpc <- function(optRanges,delta, maxLikelihood=FALSE){