如何编写宏来改变条图颜色？？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

我想根据数值大小改变条形图条的颜色，下面是我想编的程序，不太对，还请大家帮忙看看，这个怎么实现？

%macro colors(i=,x=);

%if &x>0 %then color=(red blue );
%else color=(blue red );


goptions hsize=5.4in  vsize=1.5in colors=&color ;

axis1 label=none  order=(-100 to 100 by 25);
axis2 label=none value=("");

proc gchart data=rank(where=(group='&i'));
hbar  group /type=sum sumvar=&x
         raxis=axis1 maxis=axis2
         width=5.4
         nostats
                 coutline=red         
         ;
run;
%mend colors;
/*排名图的绘制，条的颜色设置？？*/
data rank;
input math chinese  group$;
cards;
75 50   8
25 25   9
50 -25  13
-25 100 10
;
run;
%colors(i=8,x=math)

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：goptions OUTLINE options Chinese Option color where 如何 程序

这样显示的是  NOTE: 没有从数据集 WORK.RANK 中选择观测。不知道为什么？

%macro colors(i=,x=);

%if &x>0 %then %let color=(red blue );
%else %let  color=(blue red );


goptions hsize=5.4in  vsize=1.5in colors=&color ;

axis1 label=none  order=(-100 to 100 by 25);
axis2 label=none value=("");

proc gchart data=rank(where=(group='&i'));
hbar  group /type=sum sumvar=&x
         raxis=axis1 maxis=axis2
         width=5.4
         nostats
                 coutline=red         
         ;
run;
%mend colors;
/*排名图的绘制，条的颜色设置？？*/
data rank;
input math chinese  group$;
cards;
75 50   8
25 25   9
50 -25  13
-25 100 10
;
run;
%colors(i=8,x=math)

给起来  

自己顶起来

绘图颜色不能用宏来改变么？有人知道么

sasjunior 发表于 2014-12-18 17:57
我想根据数值大小改变条形图条的颜色，下面是我想编的程序，不太对，还请大家帮忙看看，这个怎么实现？

...

看你的macro,你想要一开始比较math > 0 ?而且如果是数值变量的话，也要用%eval吧

1. %macro colors(i=,x=);
   
2. 
   
3. %if &x>0 %then %let color=(red blue );
   
4. %else %let  color=(blue red );
   
5. 
   
6. 
   
7. goptions hsize=5.4in  vsize=1.5in colors=&color ;
   
8. 
   
9. axis1 label=none  order=(-100 to 100 by 25);
   
10. axis2 label=none value=("");
    
11. 
    
12. proc gchart data=rank(where=(group=&i));
    
13. hbar  group /type=sum sumvar=&x
    
14.          raxis=axis1 maxis=axis2
    
15.          width=5.4
    
16.          nostats
    
17.                  coutline=red         
    
18.          ;
    
19. run;
    
20. %mend colors;
    
21. /*排名图的绘制，条的颜色设置？？*/
    
22. data rank;
    
23. input math chinese  group;
    
24. cards;
    
25. 75 50   8
    
26. 25 25   9
    
27. 50 -25  13
    
28. -25 100 10
    
29. ;
    
30. run;
    
31. %colors(i=8,x=math)

复制代码

sushe1527 发表于 2015-1-17 00:40

复制了一遍我的code？

tangliang0905 发表于 2015-1-16 23:40
看你的macro,你想要一开始比较math > 0 ?而且如果是数值变量的话，也要用%eval吧

您好，我查了下%eval的用法，这个是用于给变量运算赋值的，如%let a=%eval(1+2);，我这里的X本身是数据集里的数据，不需要再赋值了吧？还请您说的具体些

tangliang0905 发表于 2015-1-16 23:40
看你的macro,你想要一开始比较math > 0 ?而且如果是数值变量的话，也要用%eval吧

您好，我查了下%eval的用法，这个是用于给变量运算赋值的，如%let a=%eval(1+2);，我这里的X本身是数据集里的数据，不需要再赋值了吧？还请您说的具体些，谢谢！