########利用CV方法选择回归函数核估计的带宽######
#
K<-function(x){
0.75*(1-x^2)*(abs(x)<=1) ####Epanechnikov核
}
#
cvhNW<-function(h,x,y){
n<-len版权声明:本文为weixin_44737923原创文章,遵循CC 4.0 BY-SA版权协议,转载请附上原文出处链接和本声明。
########利用CV方法选择回归函数核估计的带宽######
#
K<-function(x){
0.75*(1-x^2)*(abs(x)<=1) ####Epanechnikov核
}
#
cvhNW<-function(h,x,y){
n<-len