搓一把
data cos;input a b;cards;
0.1 0.03
0.2 0.04
0.4 0.08
0.5 0.24
0.7 0.51
;
data name;do a=0.1 to 0.7 by 0.1;output;end;
data cosname;merge name cos;by a;c=a**2;if b=. then c=.;else c=c;proc print data=cosname;run;
结果
Obs a b c
1 0.1 0.03 0.01
2 0.2 0.04 0.04
3 0.3 . .
4 0.4 0.08 0.16
5 0.5 0.24 0.25
6 0.6 . .
7 0.7 0.51 0.49
http://www.pinggu.org/bbs/dispbbs.asp?boardid=68&id=294149&star=1#294149