求大神 改程序

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

我想把下面的程序改成一个宏    得出一个数值 rf并能赋值;;;
proc means data=a;
var rr;
output out=b mean=rf;run;

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：output means outpu mean Data 程序

proc sql;
select mean(rr)
       into :rf
           from a;
quit;

或者
data _null_;
set b;
call symputx("rf",rf);
run;

产生一个宏变量&rf

hamsik11 发表于 2013-2-26 14:38
proc sql;
select mean(rr)
       into :rf

谢谢，，我的目标是数据集a  和变量rr也是变化的，，我不用手工改a和rf，能改这样的一个宏吗？

jingliang30 发表于 2013-2-26 14:59
谢谢，，我的目标是数据集a  和变量rr也是变化的，，我不用手工改a和rf，能改这样的一个宏吗？

这样？

%macro GetMean(input=,var=);
proc sql noprint;
select mean(&var)
       into :mean_&var
           from &input;
quit;
%mend;

%GetMean(input=a,var=rr)

hamsik11 发表于 2013-2-26 15:14
这样？

%macro GetMean(input=,var=);

大神  不行  有各种各样的错误

啊哦...不要这么使用宏


%macro GetMean(input=,var=);
proc sql noprint;
select mean(&var)
       into :rf
           from &input;
quit;
%mend;

%GetMean(input=a,var=rr)

data _null_;
want=symget('rf');
put want;
run;

hamsik11 发表于 2013-2-26 15:42
啊哦...不要这么使用宏

恩，谢谢这次有用了，，，但是还是想更进一步，，%GetMean(input=test_one,var=rr);已经把rf确定了，，，但是我在里面还想计算别的变量mean的是不是还要继续%GetMean(input=test_one,var=r_1);
data a;
set test_one;
want1=symget('rf');
run;
但是这样方法不能形成两个变量的均值。或者更多。。因为不懂，，可能有时问题比较低级，，，谢谢

jingliang30 发表于 2013-2-26 16:02
恩，谢谢这次有用了，，，但是还是想更进一步，，%GetMean(input=test_one,var=rr);已经把rf确定了，，， ...

如果想用函数的方法来实现的话，你可以查查fcmp函数编辑器，这个看起来很简单，我很少用过fcmp，期待高手解决