::: {.cell hash='02_R_introduction_cache/revealjs/unnamed-chunk-129_078a36f8a7c3bfe2cec8f0fca724b2af'}

```{.r .cell-code}
rescale01 <- function(values) {
  maxval <- max(values)
  minval <- min(values)
  
  (values - minval) / (maxval - minval)
}
```
:::