assert/check/test/FuzzyMultiset
Validation checks to test if a given object is an R6 FuzzyMultiset
.
testFuzzyMultiset(object, errormsg = "This is not an R6 FuzzyMultiset object") checkFuzzyMultiset(object, errormsg = "This is not an R6 FuzzyMultiset object") assertFuzzyMultiset( object, errormsg = "This is not an R6 FuzzyMultiset object" )
object |
object to test |
errormsg |
error message to overwrite default if check fails |
If check passes then assert
returns object
invisibly and test
/check
return TRUE
. If check fails, assert
stops code with error, check
returns
an error message as string, and test
returns FALSE
.
testFuzzyMultiset(Set$new(2, 3)) testFuzzyMultiset(list(Set$new(2), Set$new(3))) testFuzzyMultiset(Tuple$new(2, 3)) testFuzzyMultiset(Interval$new()) testFuzzyMultiset(FuzzySet$new(2, 0.1)) testFuzzyMultiset(FuzzyTuple$new(2, 0.1)) testFuzzyMultiset(ConditionalSet$new(function(x) x == 0))
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.