# NOT RUN {
# See vignette("DCSmooth") for further examples and explanation
u <- seq(from = -1, to = 0.5, length.out = 151)
kern_MW220 <- kernel.assign("MW_220")
k <- kern_MW220(u, 0.5)
plot(u, k, type = "l")
# }
Run the code above in your browser using DataLab