新手：能否解释下下列代码的data部的含义

shiyiming

data cheese (drop =z1-z9);
x1=(_n_=1);x2=(_n_=2);x3=(_n_=3);
array z z1-z9;input z1-z9;do over z;
y=_i_;freq=z;
output;
end;
label y="品尝得分";
cards;
0  0 1  7  8  8 19 8  1
6  9 12 11 7  6 1  0  0
1  1 6  8  23 7 5  1  0
0  0 0  1  3  7 14 16 11
;
这段程序我运行生成了数据集合，但是我不知道这些代码的含义，如何生成的，麻烦高手解释一下？谢谢。
请问哪里能下关于data部编程的书，谢谢高手帮忙，

shiyiming

仔细体会一下，不难！
x1=(_n_=1);
x2=(_n_=2);
x3=(_n_=3);
当input到_n_=1时x1=1,x2=0,x3=0;
当input到_n_=2时x1=0,x2=1,x3=0;
当input到_n_=3时x1=0,x2=0,x3=1;
当input到_n_=4时x1=1,x2=0,x3=0;
所以很简单，
后面就是把数组z1-z9值读到freq里面。
具体还是要搂住去细细体会。
我写了段等价程序，希望对搂住理解程序有帮助。
[code:1vnj3qvt]
data cheese2(drop=z1-z9);
x1=(_n_=1);
x2=(_n_=2);
x3=(_n_=3);
array z{9} z1-z9;
input z1-z9;
do i=1 to 9;
        freq=z(i);
        output;
end;

label y="品尝得分";
cards;
0 0 1 7 8 8 19 8 1
6 9 12 11 7 6 1 0 0
1 1 6 8 23 7 5 1 0
0 0 0 1 3 7 14 16 11
;
run;
[/code:1vnj3qvt]

shiyiming

谢谢您的帮助，谢谢。