diff --git a/R/plot_NparOF.R b/R/plot_NparOF.R index c701eab042971b9c98e6609b10727e86357d0de9..a573a067eeb417462f264fb963e5e29813163d22 100755 --- a/R/plot_NparOF.R +++ b/R/plot_NparOF.R @@ -108,7 +108,8 @@ plot_NparOF <- function(params, #probs=c(0, 0.25, 0.5, 0.75, 0.9, 0.95, 1), na.rm=TRUE) ), probs=c(0, 0.5, 0.95, 0.97, 0.98, 0.99, 1), na.rm=TRUE) ), GOFcuts <- unique( quantile( as.numeric(gofs), - probs=c(0, 0.25, 0.5, 0.75, 0.9, 0.95, 1), na.rm=TRUE) ), + probs=c(0, 0.01, 0.02, 0.03, 0.05, 0.5, 1), na.rm=TRUE) ) + ) } # IF end } # IF end