补齐数据观测b

接着  https://bbs.pinggu.org/forum.php? ... =5455866&extra=

第二种补齐规则为

name	year	qtr	institution	sex
张三	2013	1	微软	男
张三	2013	2	微软	男
张三	2013	3	微软	男
张三	2013	4	微软	男
张三	2014	1	微软	男
张三	2014	2	微软	男
张三	2014	3	微软	男
张三	2014	4	微软	男
张三	2015	1	脸书	男
张三	2015	2	脸书	男
张三	2015	3	脸书	男
张三	2015	4	脸书	男
李四	2015	2	联合利华	女
李四	2015	3	联合利华	女
李四	2015	4	联合利华	女
王五	2013	4	谷歌	男
王五	2014	1	谷歌	男
王五	2014	2	谷歌	男
王五	2014	3	华为	男
王五	2014	4	华为	男
王五	2015	1	华为	男
王五	2015	2	小米	男
王五	2015	3	小米	男
王五	2015	4	小米	男

proc sort data=test;
by name year qtr;
run;

proc sql;
create table allclass1 as
select distinct name, year
from test;
quit;

data allclass2;
set allclass1(keep=name year);
do qtr=1 to 4;
output;
end;
run;

proc sort data=allclass2;
by name year qtr;
run;

data wanted;
merge test allclass2;
by name year qtr;
length _ins _sex $40;
retain _ins _sex;
if first.name then do;_ins=' ';_sex=' ';end;
if ^missing(institution) then do;
  _ins=institution;
  _sex=sex;
end;
else do;
  institution=_ins;
  sex=_sex;
end;
if institution='' then delete;
drop _ins _sex;
run;

即每个name最后一期观测为   2015  4