DATA weight;
input last before site$@@;
cards;
32.6        27.2 R        35.2        28.6        C        24.6        20.4        F
36.6        32         R        29.1        22.4        C        23.4        19.6        F
37.7        33         R        28.9        23.2        C        30.3        25.1        F
31.0        26.8 R        30.2        24.4        C        21.8        18.1        F

run;
data weight;
set weight;
d1=(site="C");
d2=(site="F");
bes=d1*before;
bef=d2*before;
run;
proc reg data=weight;
model last= before d1 d2 bes bef;
all: test d1=d2=bes=bef=0;
intercept: test d1=d2=0;
slope: test bes=bef=0;
run;
程序编的有错吗 为什么运行不了