Usage
testPositiveSkew(
object,
errormsg = paste(object$short_name, "is not positive skew")
)checkPositiveSkew(
object,
errormsg = paste(object$short_name, "is not positive skew")
)
assertPositiveSkew(
object,
errormsg = paste(object$short_name, "is not positive skew")
)