Compute whether x and y are approximately equal given a tolerance level
approx_equal(x, y, tol = .Machine$double.eps^0.5)
x %~% y
Numeric scalar.
Numeric scalar.
Tolerance.
Boolean
approx_equal(1, 1)
#> [1] TRUE
1 %~% (1 + 1e-16)
#> [1] TRUE
1 %~% 1.01
#> [1] FALSE