equal_tol: Check that objects are equal to within some numerical...
In tharte/tutils: Tom's UTILity functionS

Description Usage Arguments Value Author(s) See Also Examples

Check that objects are equal to within some numerical tolerance

1	equal_tol(x, y, tol = 1, pct = FALSE, each = FALSE, na.rm = FALSE)

`x`	`vector`
`y`	`vector`
`tol`	`numeric` tolerance
`pct`	`logical` tolerance is a percentage of mean
`each`	`logical` returns element-by-element comparison, if `TRUE`
`na.rm`	`logical` remove NAs, if `TRUE`

logical

Thomas P. Harte

mean

   x<- c(NA, 1:10)
   set.seed(1)
   y<- x + rnorm(length(x), sd=.01)
   cbind(x, y)

   equal_tol(x, y, tol=0.1, na.rm=TRUE)
   equal_tol(x, y, tol=0.1, pct=TRUE, na.rm=TRUE)
   equal_tol(x, y, tol=0.1, each=TRUE, na.rm=TRUE)
   all(equal_tol(x, y, tol=0.1, each=TRUE, na.rm=TRUE))