library(mgcv)
data(longley2)
form = GNP ~ Year
GNPpred = syxi(form, data=longley2, i = 1)
plot(GNPpred, type="xy")
title(main="y = GNP on x1 = Year")
plot(GNPpred, type="sy")
title(main="y = GNP on Spline for Year")
Run the code above in your browser using DataLab