Questions
You could use the stopifnot() function if you want the program to produce an error:
stopifnot()
foo <- function(x) { stopifnot(x > 500) # rest of program }
~ Answered on 2013-07-24 14:56:30