1#' Rescale palette (continuous)
2#'
3#' Just rescales the input to the specific output range.  Useful for
4#' alpha, size, and continuous position.
5#'
6#' @param range Numeric vector of length two, giving range of possible
7#'   values.  Should be between 0 and 1.
8#' @export
9rescale_pal <- function(range = c(0.1, 1)) {
10  force(range)
11  function(x) {
12    rescale(x, range, c(0, 1))
13  }
14}
15