Check whole Numbers
is.wholenumber(x, tol = .Machine$double.eps^0.5)
x
numeric.
tol
the smallest positive floating-point number x such that 1 + x != 1.
A logical scalar.