# NOT RUN {
data(longley2)
form <- Employed~GNP+GNP.deflator+Unemployed+Armed.Forces+Population+Year
rxuobj <- unr.ridge(form, longley2)
rxuprd <- RXpredict(rxuobj, longley2)
plot(rxuprd)
# Clearly Biased predictions can still represent "Optimal" Variance-Bias Trade-Offs...
# }
Run the code above in your browser using DataLab