给出部分原始数据，不要自己用语言描述

您好~加上附件了。
1. 变量year，sqtile, 按照这两个变量求shrcr1的median值。
2. 根据每一年度shrcr1的五个median值，生成6个dummy变量，如d1：2008年~2014年shrcr1值小于第一个中间值，则为1，否则为0。
谢谢~！

还是没看懂要求，什么样的六个dummy变量?

你看是这个意思吗？但是只有 5个dummy变量啊
data want;
infile 'C:\360Downloads\quest1.csv' missover dsd firstobs=2;
input id : $10. year sqtile shrcrl;
run;
proc sort data=want out=aa;
by year sqtile;
run;
proc means data=aa noprint;
by year sqtile;
var shrcrl;
output out=work.b(drop= _type_ _freq_) median=med_shr;
run;
data union;
merge aa(in=a) b(in=b);
by year sqtile;
run;
%macro change;

%do j=2008 %to 2014;
data final;
set union;
where year = &j.;
run;

proc sql noprint;
select med_shr into :macro1-:macro5 from work.b
where year=&j.;
quit;
run;

data aaa;
set final;
%do i=1 %to 5;
if shrcrl < &&macro&i. then d&i.=1;
else d&i.=0;
%end;
run;


proc append base=want_set new=aaa;
run;

%end;
run;

%mend change;
%change;

谢谢你的回复，好像还是不行