Check numerical values for identity
Check two variables on numerical identity or whether both are either NaN or NA.
num.ident(x,y)
x, y |
Variables to check for identity, may be arrays. |
No check is made whether x or y are numeric
Christian W. Hoffmann <christian@echoffmann.ch>
xxxx <- c(100,-1e-13,Inf,-Inf, NaN, pi, NA) names(xxxx) <- formatC(xxxx, dig=3) (aaaa <- outer(xxxx,xxxx,function(x,y) num.ident(x,y))) all((aaaa & !is.na(aaaa)) == (row(aaaa) == col(aaaa))) # aaaa has TRUE only on the diagonal, i.e. identity works correctly
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.