请问用宏做了50步均值过程，如何把所有的均值保存到一个数据集

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

程序如下：
data a;                                                                                                                                                                                                                                                         
input x@@;                                                                                                                                                                                                                                                      
cards;                                                                                                                                                                                                                                                         
10 11 9 8 10 9 8 11 7 13 12 12 10 7 9                                                                                                                                                                                                                           
;                                                                                                                                                                                                                                                               
run;                                                                                                                                                                                                                                                            
%macro loop_a;                                                                                                                                                                                                                                                
%do i=1 %to 50;                                                                                                                                                                                                                                                
proc surveyselect data = a                                                                                                                                                                                                                                      
     method=srs n=5  out=k&i;                                                                                                                                                                                                                                   
proc means data=k&i; output out=u&i mean=w;                                                                                                                                                                                                                     
%end;                                                                                                                                                                                                                                                           
%mend;                                                                                                                                                                                                                                                         
%loop_a;
我是用了 output out=u&i  mean=w; 生成了好多数据集再合并的，请达人指点。

问题应该是如果不用均值过程，如何得到并保存抽样过程的均值到一个数据集........l囧rz

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：数据集 surveyselect Surveys output Survey 如何 程序

data a;                                                                                                                                                                                                                                                         
input x@@;                                                                                                                                                                                                                                                      
cards;                                                                                                                                                                                                                                                         
10 11 9 8 10 9 8 11 7 13 12 12 10 7 9                                                                                                                                                                                                                           
;                                                                                                                                                                                                                                                               
run;                                                                                                                                                                                                                                                            
%macro loop_a;                                                                                                                                                                                                                                                
%do i=1 %to 50;                                                                                                                                                                                                                                                
proc surveyselect data = a                                                                                                                                                                                                                                      
     method=srs n=5  out=k&i noprint;
run;
data k&i;
set k&i;
n=&i;                                                                                                                                                                                                                  
%end;                                                                                                                                                                                                                                                           
%mend;                                                                                                                                                                                                                                                         
%loop_a;
data k;
set k1-k50;
run;
proc means data=k;
class n;
var x;
output out=u mean=w;  
run;

优化了一下
1。不用输出每一个surveyselect过程
2。把所有数据集合并，用N作为分组变量
3。只对一个数据集进行均值分析，结果保存在一个数据集里面

问题是如果不用均值过程，如何得到并保存抽样过程的均值到一个数据集
-------------------------------------------------------------------------------------------------
不用均值过程，还需要求出均值，我只能说你的认识已经提高到一个高度了

4# sushe1527
呵呵
楼主的问题有点意思

尴尬，只能说高人就是高人，连表意不清的问题都能理解清楚
我杯具了……

1. data a;                                                                                                                                                                                                                                                         
   
2. input x@@;                                                                                                                                                                                                                                                      
   
3. cards;                                                                                                                                                                                                                                                         
   
4. 10 11 9 8 10 9 8 11 7 13 12 12 10 7 9                                                                                                                                                                                                                           
   
5. ;                                                                                                                                                                                                                                                               
   
6. run;            
   
7. 
   
8. %MACRO TEST(n,m);
   
9.         data _null_;
   
10.                 set a nobs=n;
    
11.                 call symput("NOBS",n);
    
12.         run;
    
13.         %put &NOBS;
    
14.         data b;
    
15.                 retain s1-s&m &n n &nobs t1-t&m 0;
    
16.                 set a end=eof;
    
17.                 %do i=1 %to &m %by 1;
    
18.                         if ranuni(0)<=s&i/n then do;
    
19.                                 t&i+x;
    
20.                                 s&i+(-1);       
    
21.                         end;
    
22.                 %end;
    
23.                 n+(-1);
    
24.                 if eof then do;
    
25.                         %do i=1 %to &m %by 1;
    
26.                                 NO=&i;
    
27.                                 AVG=t&i/&n;
    
28.                                 output;
    
29.                         %end;
    
30. 
    
31.                 end;
    
32.                 keep NO AVG;
    
33.         run;
    
34. %MEND TEST;
    
35. %TEST(5,50);

复制代码

不用过程步......
抽n个m次，计算均值，如果需要具体抽取样本，稍加修改也可以输出

7# soporaeternus
效率问题
数据量大的话其实还是很好
最好用MEANS过程