谁能具体解释一下这个宏程序

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

*求最后一次产检的孕周;

                %letchkweek= chk_week1-chk_week20;

                arrayarr_y{*} &chkweek;

                y_max=max(ofarr_y(*));

                doi=1 to dim(arr_y);

       y_last=ifn(missing(arr_y(i)),y_last,arr_y(i));

       y_mis=ifn(i gt 1 and missing(arr_y(i)),min(i,y_mis),y_mis);

   end;

   y_mis=arr_y(y_mis-1);

                diff=y_max-y_last;

                ifdiff^=0 then delete;

                labely_last='最后一次产检的孕周';

*求最后一次产检的--体重;

                %letwght_g= wght1-wght20;

                arrayarr_w{*} &wght_g;

                wght_g_max=max(ofarr_w(*));

                doi=1 to dim(arr_w);

       wght_g_last=ifn(missing(arr_w(i)),wght_g_last,arr_w(i));

       wght_g_mis=ifn(i gt 1 andmissing(arr_w(i)),min(i,wght_g_mis),wght_g_mis);

   end;

   wght_g_mis=arr_w(wght_g_mis-1);

                labelwght_g_last='最后一次记录的产检体重';

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：宏程序 missing delete array label blank already player 程序