Squish infinite values to range.

squish_infinite(x, range = c(0, 1))

## Arguments

x |
numeric vector of values to manipulate. |

range |
numeric vector of length two giving desired output range. |

## Examples

squish_infinite(c(-Inf, -1, 0, 1, 2, Inf))

#> [1] 0 -1 0 1 2 1