R/rm_squeeze.R

Defines functions rm_squeeze

## File Name: rm_squeeze.R
## File Version: 0.03

rm_squeeze <- function(x, lower, upper )
{
    x[ x < lower ] <- lower
    x[ x > upper ] <- upper
    return(x)
}

Try the sirt package in your browser

Any scripts or data that you put into this service are public.

sirt documentation built on May 29, 2024, 8:43 a.m.