warnifnot function

Test the Truth of R Expressions and Warn