[问答] 剔除缺失值进行运算 [推广有奖]

关键我的数据是有缺失值的，要所有非缺失值的乘积

data tmp;
        retain a 1;
        input x @@;
        if x = . then delete;
         a = a * x;
datalines;
10 . 1 2 3 4
;
run;

Try this codes below, you can have the product of any amount of variables

data temp;
input a b c d e f;
datalines;
1 2 . 3 4 5
2 3 4 5 6 1
. . 3 4 2 1
3 2 3 . 2 1
;
run;

data calculate;
set temp;
array numb(*) _numeric_;
result=1;
do i=1 to dim(numb);
      if numb(i)^=. then result=result*numb(i);
end;
output;
drop i;
run;

有道理