An introduction to smoothing spline ANOVA model,有r语言程序