::: {.cell hash='02_R_introduction_cache/pdf/unnamed-chunk-28_888dc44d06e36b206dd54d47582ba1e7'}

```{.r .cell-code}
dplyr::near(sqrt(2)^2, 2)
```

::: {.cell-output .cell-output-stdout}
```
[1] TRUE
```
:::
:::