%include 'K:\fsr_linear.txt';
options nodate nonumber ps=2000;
data diabetes;
infile "K:\diabetes.tab.txt" firstobs=2 delimiter='09'x;
input age sex bmi bp s1 s2 s3 s4 s5 s6 y;
%fsr_linear(dataset=diabetes,model=age--s6 @q,gamma=0.05,y=y,method=1,terms=20);