第五部分sas数据步循环和转移控制.ppt

第五部分sas数据步循环和转移控制;DO语句 ;简单DO语句 ;应用举例 ;循环DO语句 ;SPECIFICATION选项格式 ;例8.2 缺省的步长为1。 do I=1 to 1000; do I=1 to y+3; do I=1 to exit;;例8.3 起始值例句。 do i=5; do i=1 to n ; do i=n to 1 by –1; do i=k+1 to n-1; do i=1 to k-1, k+1 to n; do i=2, 3, 5, 7, 11, 13, 17; do i= to by , 1 to 10 by 1, 20 to 100 by 10; do i=saturday, sunday; do i=01jan99d, 25feb99d; do i=01jan99d to 01jan2000d by 1; 例句子中，起始值必须全部是数值或全部是字符常数，也可以是变量。字符常数必??用引号括起来。 ;例8.4 使用表达式选项。 do i=1 to 10 while(xy); do i=2 to 20 by 2 until((x/3)y); do i=10 to 0 by –1 while(month=jan);;应用举例 ;例8.6 产生指定观测值个数的数据集。 data a; do n=1 to 100 ; output; end; run; 例中，产生一个含有100个观测值的数据集。 ;例8.7 自然数求和。 data a; t=0; do n=1 to 100 ; t=t+n; output; end; run; 例中，求1到100的自然数之和。 ;DO OVER语句 ;应用举例 ;DO WHILE语句 ;应用举例 ;DO UNTIL语句 ;应用举例 ;END语句 ;应用举例 ;SELECT语句 ;应用举例 ;例8.14 没有SELECT表达式的SELECT语句。 data _null_; do mon=jan,feb,mar,apr,may,jun,jul,aug,sep; select; when (mon in (jun,jul,aug)) put summer mon=; when (mon in (mar,apr,may)) put spring mon=; otherwise put fall or winter mon=; end; end; run; ;361 data _null_; 362 do mon=jan,feb,mar,apr,may,jun,jul,aug,sep; 363 select; 364 when (mon in (jun,jul,aug)) put summer mon=; 365 when (mon in (mar,apr,may)) put spring mon=; 366 otherwise put fall or winter mon=; 367 end; 368 end; 369 run; fall or wintermon=jan fall or wintermon=feb spring mon=mar spring mon=apr spring mon=may summer mon=jun summer mon=jul summer mon=aug fall or wintermon=sep NOTE: “DATA 语句”所用时间（总处理时间）: 实际时间 0.03 秒 CPU 时间 0.01 秒;例8.15 SELECT组的正确及错误用法举例。 select(x); when (x=2) put two; /*错误用法*/ end; select(x); when(2) put two; /*正确用法*/ end; select; when (x=2) put two; /*正确用法*/ end; run; 例中，后两个程序的效果相同。 ;IF语句;子集IF语句 ;例8.17 应用举例。 data a; set ResDat.Idx000001; if _n_100; run; 例中，选择前99条观测值。;GO TO语句与语句标号 ;例8.18 应用举例。 data a; input x @@; if 1=x=5 then goto ok; put x; count+1; ok: sumx+x; cards; 1 2 7 2 12 24 22 ;run; 例中，COUNT仅对大于5的数计数，SUMX+X对每个观测都执行。 ;data a; input x @@; if 1=x=5 then goto ok; put