大家好！

         我想扩张某个数据集，例如数据集A如下：
      Asset_No   Period
         Asset1     0
         Asset1     1
       。。。
         Asset1      10
       。。。
         Asset33     0
         Asset33     1
       。。。
         Asset33      10

        因为模拟了10000次，我希望将数据集扩张为B：
       Nsim    Asset_No   Period
          1         Asset1      0
          1          Asset1     1
       。。。
          1         Asset1      10
       。。。
           1        Asset33     0
           1        Asset33     1
       。。。
           1        Asset33      10


        .......

          10000   Asset1      0
          10000   Asset1     1
       。。。
          10000   Asset1      10
       。。。
           10000  Asset33     0
           10000  Asset33     1
       。。。
           10000   Asset33      10



我写的程序如下：
%macro ht;
%do i=0 %to 9999;
data a;
set ht1;
Simulation_Nber=&i.;
run;

%if &i.=0 %then
%do;
data b;
set a;
run;
%end;
%else;
%do;
data b;
set b a;
run;
%end;

%end;
%mend;
%ht;



显然上述代码是没有效率的，请问大家有没有更好的办法？