[求助] SAS 迴圈列出九九乘法表

shiyiming

1.請問如何將九九乘法表全部列出來呢?
  大概知道是
   Data a;
   input x1-x9 y1-y9;
   do i=1 to 9;
   do j=1 to 9;
   END;
   END;
   但是不太對。

2.而且要怎麼只顯示右上及左下?
   大概像
  IF i<j THEN DO;
        i*j;
   END;
   如
  1   2   3   4   5   6   7   8   9
1  1
2  2  4
3  3  6   9
4  4  8  12 16
5  5 10 15 20   .
6  6 12 18 24   .    .
7  7 14 21 28   .    .    .
8  8 16 24 32   .    .    .    .
9  9 18 27 36   .    .    .    .    .
及
  1   2   3   4   5   6   7   8   9
1  1   2   3   4   5   6   7   8   9
2       4   6   8 10  12 14  16 18
3            9 12 15  18  21 24 27
4               .    .    .    .    .    .
5                    .    .    .    .    .
6                          .    .    .    .
7                               .    .    .
8                                     .    .
9                                          .

先謝謝各位高手^^"

Qiong

[code:3gmsx1sp]data all ;
array a(9);
do j=1 to 9;
do i=1 to 9;
a(i)=i*j;
end;
output all ;
end;
drop i j;
run;
data  left;
array a(9);
do j=1 to 9;

do i=1 to j;
a(i)=i*j;
end;
output left;

end;
drop i j;
run;

data  right;
array a(9) ;
do j=1 to 9;
do i=1 to 9;
a(i)=i*j;
if i<j then a(i)=.;
end;
output right;
end;
drop i j;
run;

[/code:3gmsx1sp]