This is a safe way of comparing if two vectors of floating point numbers
are (pairwise) equal. This is safer than using `==`

, because it has
a built in tolerance

`near(x, y, tol = .Machine$double.eps^0.5)`

## Arguments

x, y |
Numeric vectors to compare |

tol |
Tolerance of comparison. |

## Examples

```
sqrt(2) ^ 2 == 2
#> [1] FALSE
near(sqrt(2) ^ 2, 2)
#> [1] TRUE
```