powered by
check if input is natural number
is.naturalnumber(x, tol = .Machine$double.eps^0.5)
numeric number to be checked
maximum accepted tolerance when checking if natural