Check if a number is whole
is.whole(x, tol = .Machine$double.eps^0.5)
x
Object to be tested
tol
Numeric: tolerance used for comparison
TRUE if number is whole; otherwise, FALSE