powered by
Asymmetric Uniform Kernel
AKer.unif(u)
Kernel values at u (0 outside [0, 1]).
Numeric vector of evaluation points.
u <- seq(-0.5, 1.5, length.out = 100) plot(u, AKer.unif(u), type = "l", main = "Asymmetric Uniform Kernel")
Run the code above in your browser using DataLab