请问SAS有求一组数的最大公约数的函数吗？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

如题，谢谢！

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：公约数 公约数

1. data _null_;
   
2.    x=gcd(10, 15);
   
3.    put x=;
   
4. run;

复制代码

YueweiLiu 发表于 2011-9-28 10:16

嗯，多谢

我现在有一组宏变量，var1, var2 ,....，数量不定，总数保存在另一个宏变量varnum中
如果求得这些宏变量的最大公约数啊GCD(var1, var2, ...)？不太会写这个程序
望赐教，谢谢！

不知道你是想把结果放到宏变量还是数据集中，要是前者可以这样：

1. %let var1=9;
   
2. %let var2=21;
   
3. %let var3=63;
   
4. %let nvar=3;
   
5. 
   
6. %macro gcd;
   
7.         %do i=1 %to &nvar;
   
8.                 %if &i=1 %then %let nums=&&var&i.;
   
9.                 %else %let nums=%sysfunc(catx(%str(,),&nums.,&&var&i.));
   
10.         %end;
    
11.         %let gcd=%sysfunc(gcd(&nums));
    
12.         %put &gcd;
    
13. %mend;
    
14. %gcd;

复制代码

要是后者，可以这样：

1. %let var1=9;
   
2. %let var2=21;
   
3. %let var3=63;
   
4. %let nvar=3;
   
5. 
   
6. %macro gcd;
   
7. data want;
   
8.         %do i=1 %to &nvar;
   
9.                 %if &i=1 %then %let nums=&&var&i.;
   
10.                 %else %let nums=%sysfunc(catx(%str(,),&nums.,&&var&i.));
    
11.         %end;
    
12.         gcd=gcd(&nums);
    
13. run;
    
14. %mend;
    
15. %gcd;

复制代码

YueweiLiu 发表于 2011-9-28 11:26
不知道你是想把结果放到宏变量还是数据集中，要是前者可以这样：要是后者，可以这样：

嗯，多谢大牛

我之前也想到了可以用catx连一下，只是这个逗号作分隔符没想到怎么办
你这个%str()真不错