sas宏中生成不同分布类型的随机数，rand函数中字符串设置 或 其他方法

相似文件 换一批

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

1. %macro normal(m,n ,mean,sigma,name,type) ;
   
2. data &name.;
   
3.         array x x1-x&m.;
   
4.         %do i =1 %to &n.;
   
5.                 do over x;
   
6.                         x=Rand('&type',&mean.,sqrt(&sigma.));
   
7.                 end;  
   
8.                 output;
   
9.         %end;
   
10.   run;
    
11. %mend;
    
12. 
    
13. %normal(2,2,2,2,fff,normal);

复制代码

运行提醒 RAND 函数的第一个参数值必须是以下字符串: BERNOULLI、BETA………………，请问这怎么修改呢？

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：rand SAS宏 字符串 随机数 RAN 字符串

具体问题在这个帖子中一个回复的第五个问题
https://bbs.pinggu.org/forum.php?mod=viewthread&tid=4825926&pid=39046219&page=1&extra=#pid39046219

1. %macro normal(m,n ,mean,sigma,name,type) ;
   
2. data &name.;
   
3.         array x x1-x&m.;
   
4.         %do i =1 %to &n.;
   
5.                 do over x;
   
6.                         x=Rand("&type",&mean.,sqrt(&sigma.));
   
7.                 end;  
   
8.                 output;
   
9.         %end;
   
10.   run;
    
11. %mend;
    
12. 
    
13. %normal(2,2,2,2,fff,normal);

复制代码

孤单的我们 发表于 2016-9-27 14:27

你好，请问复制代码运行的情况怎么是这样？

解决了最后我的题目和代码是这样，谢谢啦！

4、请将程序改写成宏，要求如下
  产生数据集，包含m个变量
  每个变量有n个随机数
  所有变量都服从以下规律
  第i个变量的第j个随机数服从均数为（i除以3的余数），方差为j/2的正态分布
  并可以定义数据集的名称。

5、在以上基础上，新增功能，指定不同的分布类型

1. %macro F(m,n ,name,type) ;
   
2. data &name.;
   
3.         array x{&m} x1-x&m.;
   
4.         %do i =1 %to &n.;
   
5.                 do j=1 to &m. ;
   
6.                         %let mean=mod(j,3);
   
7.                         %let sigma_sd = sqrt(0.5*&i.);
   
8.                          x{j}=Rand("&type", &mean.,&sigma_sd.);
   
9.                 end;  
   
10.                 output;
    
11.         %end;
    
12.   run;
    
13. %mend;
    
14. 
    
15. %F(100,100,eee,NORMAL);

复制代码

%macro ran(type = ,nvar = ,n =,name = ,c1 = ,c2 = );
        data &name.;
                array x{&nvar.} x1 - x&nvar.;
                %if &c2. = . %then %do;
                        do j = 1 to &n.;
                                do i = 1 to &nvar.;
                                        x{i} = Rand("&type",&c1.);
                                end;
                                output;
                        end;
                %end;
                %else %do;
                        do j = 1 to &n.;
                                do i = 1 to &nvar.;
                                        x{i} = Rand("&type",&c1.,&c2.);
                                end;
                                output;
                        end;
                %end;
        run;
%mend;
%ran(type = poisson ,nvar = 10,n = 19,name = temp2,c1 = 5,c2 = .);