Так как вы, кажется, хотите увеличить на четыре, небольшая арифметика должна сработать. Просто проверьте, меньше ли текущая строка, чем текущий номер столбца, умноженный на 4.
data population;
do row=1 to 400;
id='ID'||put(row,z3.);
array vars v1-v99 ;
do col=1 to dim(vars);
vars[col]= row <= 4*col;
end;
output;
end;
drop row col;
run;
Чтобы увидеть, получили ли мы правильное количество единиц, мы можем добавить их:
proc means sum; run;
Результаты:
Variable Sum
------------------------
v1 4.0000000
v2 8.0000000
v3 12.0000000
v4 16.0000000
v5 20.0000000
v6 24.0000000
v7 28.0000000
v8 32.0000000
v9 36.0000000
v10 40.0000000
v11 44.0000000
...
v96 384.0000000
v97 388.0000000
v98 392.0000000
v99 396.0000000