check.fs
function is separate because
of the heavy use of the logic across a myriad of functions in this package.check.fs(fs)
quacau
,
quaexp
,
quagam
,
quagev
,
quagld
,
quaglo
,
quagno
,
quagpa
,
quagum
,
quakap
,
quanor
,
quape3
,
quawak
, and
quawei
F <- c(0.5,0.7,0.9,1.1)
if(check.fs(F) == FALSE) cat("Bad nonexceedances 0<F<1
")
Run the code above in your browser using DataLab