SAS：配列から欠損値を保持する

Question

私はdate1-date99のデータセットを持っていますが、観測ごとに欠損していない日付が最大で5つあります。私は不足していない日付を保持してdatenew1-datenew5に割り当てたいだけです。これを行うための最善の方法に関する提案。私は他のdoループ（i = 1〜5、j = 1〜99）の中でループをやっていると思っていましたが、最初の欠けていない日付がいったんあったら、次の値に移る最善の方法を覚えていませんでした発見されました。

Answer 1

私は、これはそれをしないと思う：

data have; 
informat total_nonmissing; 
do j = 1 to 1000; /*Number of rows to output*/ 
    array date[99]; 
    chosen = 0; 
    remaining = dim(date); 
    do i = 1 to remaining; 
     call missing(date[i]); 
     if ranuni(2) < (5-chosen)/remaining then do; 
      date[i] = round(ranuni(1)*10000); 
      chosen + 1; 
      remaining + (-1);    
     end; 
    end; 
    total_nonmissing = n(of date{*}); 
    format date: yymmdd10.; 
    output; 
    drop i j chosen remaining; 
end; 
run; 

data want; 
    set have; 
    array newdate[5]; 
    array date[99]; 
    j = 1; 
    do i = 1 to dim(date); 
     if not(missing(date[i])) then do; 
      newdate[j] = date[i]; 
      j + 1; 
     end; 
    end; 
    format newdate: yymmdd10.; 
    keep newdate:; 
run;