powered by
isNatural(n)
TRUE
IsNatural <- Vectorize(isNatural) IsNatural(c(-1, 0, 1, 5.1, 10, 2^53-1, 2^53, Inf, NA))
Run the code above in your browser using DataLab