inst/elmNN/R/satlins.R

satlins <-
function(x) {
  y <- ifelse(x >= 1, 1, ifelse(x <= -1, -1, x))
  y
}

Try the elmNNRcpp package in your browser

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

elmNNRcpp documentation built on March 18, 2022, 7:26 p.m.