如何简化冗余的数据生成程序？

shiyiming

今天做抽样分析时遇到一个问题，拿出来和大家交流一下，希望能得到高手指点。
是想生成如下的数据集
name
pop1
pop2
pop3
---
pop1000

这个问题，我最终的解决方案如下。有没有更高效的方案呢？
能不能在一个data step中完成呢？

[code:22jdps6j]

data ads;
do i=1 to 100;
   output;
end;
run;

data _null_;
set ads;
a='pop';
file 'c:\DataAnalysis\xx.txt';
put a$ i;
run;

data bds;
infile 'c:\DataAnalysis\xx.txt';
input a$ i;
run;

data cds;
set bds;
ds=cats(a,i);
drop a i;
run;


[/code:22jdps6j]

shiyiming

data dds;
do i=1 to 100;
        p = 'pop';
        ds=catt(p,i);
   output;
end;
run;

does this work for you?

shiyiming

有人这么回复：
Data ds;
Length Name $10;
Do i=1 to 1000;
Name=cats(\'Pop\',i);
End;
Drop i;
Run;

shiyiming

[code:1ou6t2pj]
Data ds;
set sashelp.cars(obs=100);
Name=cats('Pop',_n_);
keep name;
Run;

[/code:1ou6t2pj]
[quote="shiyiming":1ou6t2pj]有人这么回复：
Data ds;
Length Name $10;
Do i=1 to 1000;
Name=cats(\'Pop\',i);
End;
Drop i;
Run;[/quote:1ou6t2pj]

shiyiming

[quote="oloolo":1qm9aiiy][code:1qm9aiiy]
Data ds;
set sashelp.cars(obs=100);
Name=cats('Pop',_n_);
keep name;
Run;
这种方法真好!
[/code:1qm9aiiy]
[quote="shiyiming":1qm9aiiy]有人这么回复：
Data ds;
Length Name $10;
Do i=1 to 1000;
Name=cats(\'Pop\',i);
End;
Drop i;
Run;[/quote:1qm9aiiy][/quote:1qm9aiiy]

shiyiming

mark

shiyiming

[quote="shiyiming":13dth9ao]有人这么回复：
Data ds;
Length Name $10;
Do i=1 to 1000;
Name=cats(\'Pop\',i);
End;
Drop i;
Run;[/quote:13dth9ao]
[code:13dth9ao]Data ds;
Do i=1 to 100;
Name=cats('Pop',i);
output ;
End;
drop i;
Run;
[/code:13dth9ao]