* Encoding: windows-1252.
New File.

DATA LIST FREE  / R2U R2C N K J.

/* R2U: R2 Unconstrained model */
/* R2C: R2 Constrained model */
/* N: Number of observations */
/* K: Number of independent variables in unconstrained model */
/* J: Number of constraints */

/* Enter data between "BEGIN DATA." and "END DATA." */
BEGIN DATA.
0.945 0.931 12 2 1
END DATA.


Compute F = ((R2U-R2C)*(N-K-1))/((1-R2U)*J).
Compute DF1=J.
Compute DF2=(N-K-1).
Compute P = 1-CDF.F(F,DF1,DF2).
PRINT /  'F stat' 7 'DF1' 18 'DF2' 26 'p value' 36.
PRINT / F (F10.2)  DF1 (F8.0)  DF2 (F8.0) P (F16.6).
EXECUTE.