::: {.cell hash='02_R_introduction_cache/pdf/unnamed-chunk-129_cc3eb6cde649f67b893b479e551fe2c6'}

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