R/kernel.e.R

In OVL.CI: Inference on the Overlap Coefficient: The Binormal Approach and Alternatives

#' @title Epanechnikov kernel
#' @description Evaluates the Epanechnikov kernel
#' @param u vector of observations
#' @return evaluation of the Epanechnikov kernel
#' @export kernel.e
#' @examples
#' x = rnorm(100,1,2)
#' kernel.e(x)
kernel.e <- function(u){
3/4*(1-u^2)*(u<1)*(u>-1)
}