Checks for correct input
is.decay(x, tol = .Machine$double.eps^0.5)
x
decay
tol
tolerance
Georg Steinbuss