sas 非线性回归求决定系数

sas9.2以下的版本有没有求决定系数的代码？如果没有求一份自己写的计算决定系数的代码。

As long as you understand the definition of R^2. It can be easily calculated  from results. See attached example below.

The R^2=10.8101/11.0384.

********************************************************************************

                                             Sum of        Mean               Approx
           Source                    DF     Squares      Square    F Value    Pr > F

           Model                      2     10.8101      5.4050     662.72    <.0001
           Error                     28      0.2284     0.00816
           Uncorrected Total         30     11.0384


*********************************************************************************

data t1;
a=0.8; b=1;
do x=0.1 to 3 by 0.1;
y=a*(1-exp(-b*x)) + 0.1*rannor(123);
output;
end;
drop a b;
run;


ods graphics on;

proc nlin data=t1
NLINMEASURES plots(stats=all)=(diagnostics);

parms a=1 b=1;
model y=a*(1-exp(-b*x));
run;

ods graphics off;