新手求助，帮帮忙

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

要从excel中导入类似下面的数据，

IDY	AGE	HEIGHT
1	15	156
1	17	154
2	16	166
2	14	129
2	13	154
3	19	139
3	18	145
4	14	124
4	12	146
5	15	123
5	16	154
5	14	156
5	12	157
6	18	158
6	17	160
……	……	……
100	18	159

全部导入我会，我想做的是在 IDY 列 1-100编号里随机抽出50个编号的数据，然后仅使用这些数据，请教高手们如何写SAS程序做到这一点，非常感谢！！！！

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：新手求助 EXCEL sas程序 Eight 请教高手 求助 新手

用下面的codes产生一个你要保留的IDY的list，然后去跟你跟从excel中导入的数据去match。

出处： www.webpages.uidaho.edu/~brian/sas_random_sample_example.pdf

1. /* SAS program to pick a simple random sample */
   
2. /* of 'nsamp' IDYs out of 'ntot' IDYs       */
   
3. 
   
4. options nocenter ls=72;
   
5. %let ntot = 100;
   
6. %let nsamp = 50;
   
7. data pick;
   
8.   nbig=&ntot;
   
9.   nlittle=&nsamp;
   
10.   IDY=1;
    
11.   do while(nlittle>0);
    
12.     u=ranuni(0);
    
13.     if u*nbig>nlittle then do;
    
14.     nbig=nbig-1;
    
15.   end;
    
16.   else do;
    
17.     nbig=nbig-1;
    
18.     nlittle=nlittle-1;
    
19.     output;
    
20.   end;
    
21. IDY=IDY+1;
    
22.   end;
    
23. proc print;
    
24. var IDY;
    
25. run;

复制代码

有另外一个更简单的办法：

1. PROC SURVEYSELECT DATA=have OUT=pick METHOD=SRS SAMPSIZE=50 SEED=1234567; RUN;

复制代码

3# BraveMadMan
谢谢您的帮助，您给的程序确实能随机挑出50条数据，但没有解决根本问题
是我没有表述清楚，数据里IDY这一列的编号是1-100的，但是并不是只有100行数据，每一个编号里的数据是不等的，例如编号1里可以有5组数据，编号2可以有3组数据，所以100个编号的数据可能有几百行，我想做的是从IDY这100个编号里随机选出50个编号（每个编号都有自己的几组数据，总体肯定大于50了）的数据参与后续的运算，希望继续得到您的帮助！非常感谢！！！！

橡树下的往事 发表于 2010-6-20 17:47
3# BraveMadMan
谢谢您的帮助，您给的程序确实能随机挑出50条数据，但没有解决根本问题
是我没有表述清楚，数据里IDY这一列的编号是1-100的，但是并不是只有100行数据，每一个编号里的数据是不等的，例如编号1里可以有5组数据，编号2可以有3组数据，所以100个编号的数据可能有几百行，我想做的是从IDY这100个编号里随机选出50个编号（每个编号都有自己的几组数据，总体肯定大于50了）的数据参与后续的运算，希望继续得到您的帮助！非常感谢！！！！

二楼的方法没解决你的问题吗？

5# BraveMadMan

不好意思，我不知道如何去使用这段程序去match?您给指导下？谢谢
options nocenter ls=72; 还有，程序的这一句是什么意思？

橡树下的往事 发表于 2010-6-20 18:22
5# BraveMadMan

不好意思，我不知道如何去使用这段程序去match?您给指导下？谢谢

比如说你从Excel里导入的数据取名为have。下面程序中产生的want里面就是你要的随机产生的数据。

proc sql;
   create table want as
   select a.*
   from have as a, pick as b
   where a.idy = b.idy;
quit;

7# BraveMadMan 谢谢！！
非常感谢！  已经达到了我的目的！！！！！

7# BraveMadMan
不好意思啊，今天算是缠上您了，嘿嘿

我现在已经达到了原先的目的，已经随机挑出了50个编号的数据，但现在我还想另外使用其余的50个编号的数据（与之前挑出的50个编号不重叠，结合起来是原来的100个编号的数据），大师，如何做到这一点？请赐教！！！！

1. proc sql;
   
2.    create table NOTwant as
   
3.    select a.*
   
4.    from have as a, pick as b
   
5.    where a.idy ^= b.idy;
   
6. quit;

复制代码

9# 橡树下的往事