akaike.l(x, y, interval = c(0.15, 1, 0.05), plot = TRUE, parameters = FALSE)
parameters=TRUE
.Hurvich, C.M., and J.S. Simonoff. 1998. Smoothing parameters selection in nonparametric regression using an improved Akaike information criterion. Journal of the Royal Society, Series B 60: 271-293.
Cleveland, W.S., and S.J. Devlin. 1988. Locally weighted regression: An approach to regression analysis by local fitting. Journal of the American Statistical Association 83: 596-610.
loess
for details on LOESS regression.
data(modernq)
# Calculate percentages
perq<-percenta(modernq,first=2,last=39)[,2:55]
akaike.l(modernq[,1],perq[,3])
akaike.l(modernq[,1],perq[,3],parameters=TRUE)
Run the code above in your browser using DataLab