search for: scorek

...} score <- score/n return(score) } I would like to use it like this: ## ## Estimator function using Gaussian Kernel ## gaussiankernel <- function(x,y,h) { modelks <- ksmooth(x,y,kernel="normal",bandwidth=h,x.points=x) yhat <- modelks$y return(yhat) } scoreks <- loocv(data,gaussiankernel(h=0.5)) I expected this to work but it doesn't :( basically I wanted to take advantage of the named parameters so I could pass the partially specified function parameter "gaussiankernel" to loocv specifying only the h parameter and then let loocv spec...