SAS中文论坛

标题: [求助] SAS 迴圈列出九九乘法表 [打印本页]

作者: shiyiming 时间: 2009-4-20 23:11
标题: [求助] SAS 迴圈列出九九乘法表
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 时间: 2009-4-21 09:39
标题: Re: [求助] SAS 迴圈列出九九乘法表
[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]

欢迎光临 SAS中文论坛 (https://mysas.net/forum/)