Attempts to convert a numeric object to integer,
but won't if loss of information is imminent (if values after decimal
are not zero for even one value in obj
)
try2int(obj, tol = .Machine$double.eps^0.5)
An `integer` vector if no information is lost in coercion; else `numeric` vector.
a numeric vector
tolerance; if each numeric value in obj
deviate from
the corresponding integers at most the value of tol
, they are considered
to be integers; e.g. by default 1 + .Machine$double.eps
is considered
to be an integer but 1 + .Machine$double.eps^0.49
is not.
James Arnold