powered by
"Bisquare"
$$$$
Bisquare(r, c = 4.685)
set.seed(1) x = rnorm(200, mean = 3) y = Bisquare(x) plot(x, y)
Run the code above in your browser using DataLab