Calculate MSE by using Lognormal Kernel.
mseLN(y, k, h, type)
a numeric vector of positive values.
gird points.
the bandwidth
mention distribution of vector.If exponential distribution then use "Exp". if use gamma distribution then use "Gamma".
MSE
# NOT RUN { y<-rexp(100,1) h<-0.79 * IQR(y) * length(y) ^ (-1/5) mseLN(y,200,h,"Exp") # }
Run the code above in your browser using DataLab