Validation checks to test if Distribution is negative skew.
     
    
    testNegativeSkew(
  object,
  errormsg = paste(object$short_name, "is not negative skew")
)
checkNegativeSkew(
  object,
  errormsg = paste(object$short_name, "is not negative skew")
)
assertNegativeSkew(
  object,
  errormsg = paste(object$short_name, "is not negative skew")
)
 
     
    
    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.
     
    
    Examples
    testNegativeSkew(Binomial$new())
#> [1] FALSE