fix the errorsign bug, when there is no normal log

This commit is contained in:
hollorol 2018-05-04 09:50:44 +02:00
parent be3ebec109
commit 3f53b26679

View File

@ -181,12 +181,15 @@ calibMuso <- function(settings,parameters=NULL, timee="d", debugging=FALSE, logf
perror[is.na(perror)]<-0
if(length(perror)>sum(perror)){
errorsign <- 1
} else {
if(length(perror)==1){
errorsign <- 1
} else {
if(spincrash){
errorsign <- 1
} else {
errorsign <- 0
}
} }
}