
Last chance! 50% off unlimited learning
Sale ends in
Validation checks to test if a given object is an R6 Distribution.
testDistribution(object, errormsg = paste(object,
"is not an R6 Distribution object"))checkDistribution(object, errormsg = paste(object,
"is not an R6 Distribution object"))
assertDistribution(object, errormsg = paste(object,
"is not an R6 Distribution object"))
object to test
custom error message to return if assert/check fails
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
.
# NOT RUN {
testDistribution(5) # FALSE
testDistribution(Binomial$new()) # TRUE
# }
Run the code above in your browser using DataLab