R/Epanechnikov.R

"Epanechnikov"<- function(x){
  ifelse(abs(x)< 2.236068, (3/4)*(1-((x^2)/5 ))/2.236068, ifelse(abs(x)>2.236068, 0,0))
}

Try the asymmetry.measures package in your browser

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

asymmetry.measures documentation built on July 22, 2020, 9:06 a.m.