::: {.cell hash='08_Maps_cache/revealjs/unnamed-chunk-48_2d43c2d4c2480470d0d1b5670cacf8ba'}

```{.r .cell-code}
distance <- set_units(1500, "m")
distance
```

::: {.cell-output .cell-output-stdout}
```
1500 [m]
```
:::
:::