#######利用GCV方法选择回归函数的局部线性估计的带宽#####
#
K<-function(x)
{
0.75*(1-x^2)*(abs(x)<=1)
}
###
gcvhLL<-function(h,x,y){
n<-length(x)
S<-matrix(0,nrow=n,ncol=n)
GCVh<-0
for(i in 1:n){
u<- x-x[i]
Kh
利用GCV方法选择回归函数的局部线性估计的带宽
最新推荐文章于 2024-09-25 15:58:58 发布