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

fix the changeMuso order bug

Browse Source
This commit is contained in:
Roland Hollós 2019-03-08 14:07:01 +01:00
parent a116873ac4
commit 760bbaef9a
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/changeMuso.R
View File

@ -27,7 +27,7 @@ changemulline <- function(filePaths, calibrationPar, contents, fileOut, fileToCh
if(fileToChange == "epc" | fileToChange == "ini"){ if(fileToChange == "epc" | fileToChange == "ini"){
parMat<-cbind(calibrationPar, contents) parMat<-cbind(calibrationPar, contents)
parMat[order(parMat[,1]),] parMat<- parMat[order(parMat[,1]),]
changeMusoC(inFile = filePaths[selectFileToWrite(filePaths, fileToChange)], changeMusoC(inFile = filePaths[selectFileToWrite(filePaths, fileToChange)],
outFile = fileOut[selectFileToWrite(filePaths, fileToChange)], outFile = fileOut[selectFileToWrite(filePaths, fileToChange)],
parMat) parMat)