好深奥啊 帮顶

data output;
        set input;
        array temp(*) _numeric_;
        do i=1 to dim(temp);
                tmp=ranuni(1);
                if tmp<0.25 then temp(i)=.;
        end;
        drop tmp i;
run;

好的，谢谢这位高手啊，我还要认真学习一下，真是太感谢了