数据集为

data a;
    input stkcd num@@;
    cards;
    1 1 1 2 1 3 1 4 2 1 2 2 2 3 2 4 3 1 3 2 3 3 3 4
    ;
run;

proc print data=a;
run;

如何得到下面的结果

stkcd     num_lag1
1            .
1            1
1            2
1            3
2           .
2            1
2            2
2            3

3          .
3           1
3           2
3           3



说明：要用lag函数，但是要根据stkcd分类操作，就不知道怎么做了，求高手指教！