如何实现这个功能

就是有一些杂乱的数据，如何进行整理，实现如下图效果

即从左边变到右边的形式

2002是一个没有出现年份，需要在原始数据或者最终数据里添加。其他数据参见transpose procedure，或者数组也可以

data have;
length name $20.;
name='Tom';year='2001';amt=100;output ;
name='Jerry';year='2001';amt=200;output ;
name='Tom';year='2003';amt=300;output ;
run;
       
proc sort data=work.have;by name year;run;

proc transpose data=work.have out=want(drop=_name_) ;
        var amt;
        by name;
        id year;
run;