assert_is_integer(1:10)
assert_is_an_integer(99L)
#These examples should fail.
dont_stop(assert_is_integer(c(1, 2, 3)))
dont_stop(assert_is_an_integer(1:10))
dont_stop(assert_is_an_integer(integer()))
Run the code above in your browser using DataLab