[求助]一段sas的編寫

是 否 +2 論壇幣

k人 參與回答

經(jīng)管之家送您一份

應(yīng)屆畢業(yè)生專屬福利!

求職就業(yè)群

趙安豆老師微信：zhaoandou666

經(jīng)管之家聯(lián)合CDA

送您一個(gè)全額獎(jiǎng)學(xué)金名額~ !

立即領(lǐng)取

感謝您參與論壇問題回答

經(jīng)管之家送您兩個(gè)論壇幣！

+2 論壇幣

data tmp1;
input id var1 var2 var3;
cards;
1 1 1 1
2 1 1 1
3 1 1 1
4 1 1 1
;
run;

data tmp2;
input id var_nm $ value;
cards;
1 var1 2
2 var2 2
3 var3 2
4 var4 2
;
run;

data _null_;
set tmp2 end=final;
call symput(("id"||compress(_n_)),id);
call symput(("var_nm"||compress(_n_)),var_nm);
call symput(("value"||compress(_n_)),value);
if final then call symput("n",_n_);

run;

data tmp1;
set tmp1;
%do i=1 %to &n;
%if id&i=id %then %do;
&&var_nm&i=&&value&i;
%end;
run;

希望能實(shí)現(xiàn)第四個(gè)數(shù)據(jù)步的功能，但是我現(xiàn)在這樣寫是不對(duì)的，如何修改，謝謝

掃碼加我 拉你入群

請(qǐng)注明：姓名-公司-職位

以便審核進(jìn)群資格，未注明則拒絕

分享0 收藏0 回帖

關(guān)鍵詞：sas的 compress symput value Press 求助 SAS 編寫

It need macro language. Please see code below:

data tmp1;
input id var1 var2 var3;
cards;
1 1 1 1
2 1 1 1
3 1 1 1
4 1 1 1
;
run;

data tmp2;
input id var_nm $ value;
cards;
1 var1 2
2 var2 2
3 var3 2
4 var4 2
;
run;

data _null_;
set tmp2 end=final;
call symput(("id"||compress(_n_)),id);
call symput(("var_nm"||compress(_n_)),var_nm);
call symput(("value"||compress(_n_)),value);
if final then call symput("n",_n_);

run;

%macro a;
data tmp1;
set tmp1;
%do i=1 %to &n;
%if id&i=id %then %do;
&&var_nm&i=&&value&i;
%end;
%end;
run;
%mend;

%a

果然是高手啊，很厲害的！

高手啊，很厲害的！

高手!!!!

%macro test;
data _null_;
set tmp2 end=final;
call symput(("id"||compress(_n_)),id);
call symput(("var_nm"||compress(_n_)),var_nm);
call symput(("value"||compress(_n_)),value);
if final then call symput("n",_n_);
run;
data _null;
set tmp1;
call symput(("iid"!!compress(_n_)),id);
run;
data tmp1;
set tmp1;
%do i=1 %to &n;
%if &&id&i=&&iid&i %then %do;
&&var_nm&i=&&value&i;
%end;
%end;
run;
%mend test;
%test
前兩段是一樣的。

好牛啊,才學(xué)!多指教