Validation checks to test if Distribution is mixture.
Usage
testMixture(object, errormsg = paste(object$short_name, "is not mixture"))
checkMixture(object, errormsg = paste(object$short_name, "is not mixture"))
assertMixture(object, errormsg = paste(object$short_name, "is not mixture"))
Arguments
object
Distribution
errormsg
custom error message to return if assert/check fails
Value
If check passes then assert returns invisibly and test/check
return TRUE. If check fails, assert stops code with error, check returns
an error message as string, test returns FALSE.