求问这种图用SAS怎么画？

自己改改试试

1. proc format ;
   
2. value bank_fmt
   
3.         1="工"
   
4.         2="农"
   
5.         3="建"
   
6.         ;
   
7. run;
   
8. data test;
   
9. do bank=1 to 3;
   
10.         x1=abs(int(rand("Uniform")*500));
    
11.         x2=rand("Uniform");
    
12.         x3=rand("Uniform");
    
13.         output;
    
14.         end;
    
15. format bank bank_fmt. x2 x3 percent.;
    
16. label bank="银行" x1="总额" x2="银标" x3="市场";
    
17. run;
    
18. 
    
19. 
    
20. proc template;
    
21. define statgraph barseries;
    
22. begingraph;
    
23. entrytitle '**银行';
    
24. layout overlay/cycleattrs=true
    
25.         yaxisopts=(griddisplay=on label='金额' linearopts=(viewmin=0 viewmax=500))
    
26.         y2axisopts=(label='占比' linearopts=(viewmin=0 viewmax=1));
    
27.         barchart x=bank y=x1/skin=modern datatransparency=0.3 name='金额';
    
28.         seriesplot x=bank y=x2/lineattrs=graphData5(thickness=4 pattern=solid) yaxis=y2 name='银标' datalabel=x2 LINEATTRS=(color=MAGENTA);
    
29.         seriesplot x=bank y=x3/lineattrs=graphData5(thickness=4 pattern=solid) yaxis=y2 name='市场';
    
30.         discretelegend '金额' '银标' '市场' / location=outside valign=bottom halign=center;
    
31.         endlayout;
    
32. endgraph;
    
33. end;
    
34. run;
    
35. 
    
36. proc sgrender data=test template=barseries;
    
37. run;

复制代码

我从SAS9.3 Graph官方文件中，发现了一个proc程序

1. data one;
   
2. length name $ 20;
   
3. input name $ tradevolume ratio average;
   
4. cards;
   
5. 招行 4500000 0.16 0.30
   
6. 建行 3700000 0.22 0.30
   
7. 工行 3100000 0.29 0.30
   
8. 中行 2100000 0.29 0.30
   
9. 交行 1900000 0.35 0.30
   
10. 广发 1500000 0.29 0.30
    
11. 农行 1400000 0.32 0.30
    
12. 中信 900000  0.32 0.30
    
13. 平安 800000  0.65 0.30
    
14. 民生 750000  0.32 0.30
    
15. 兴业 500000  0.38 0.30
    
16. 光大 500000  0.29 0.30
    
17. ;
    
18. run;
    
19. goptions reset=all border;
    
20. ods listing close;
    
21. ods html style=analysis gtitle nogfootnote;
    
22. title1 "重点银行信用卡餐娱类交易金额及银标占比情况";
    
23. axis1 label=(j=c "全品牌交易金额") minor=none; /* left */
    
24. axis2 label=(j=c "银标占比") minor=none; /* right */
    
25. axis3 label=none; /* bottom */
    
26. legend1 position=(left c outside)  across=1;
    
27. legend2 position=(l c outside) across=1 repeat=1;
    
28. symbol1 c=red value=circle;
    
29. symbol2 c=green value=dot;
    
30. proc gbarline data=one;
    
31.    bar name / discrete sumvar=tradevolume
    
32.               raxis=axis1 maxis=axis3 legend=legend1
    
33.               des="重点银行信用卡餐娱类交易金额及银标占比情况";
    
34.    plot / sumvar=ratio  legend=legend2 axis=axis2;
    
35.    plot / sumvar=average;
    
36.    run;
    
37. quit;
    
38. 
    
39. ods html close;
    
40. ods listing;

复制代码

感觉都没有Excel的好看。
呵呵。