try2int {popEpi}

Attempt coercion to integer

Description

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)

Usage

try2int(obj, tol = .Machine$double.eps^0.5)

Arguments

obj

a numeric vector

tol

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.

Value

An 'integer' vector if no information is lost in coercion; else 'numeric' vector.

Author(s)

James Arnold

Source

Stackoverflow thread