如何用SAS画统计图，这是我的学习分享！

1. %macro comment();    /*这是一种比较特殊的注释方式*/
   
2.    Picture: Two Class Data Panel (using template and sgrender procedure)
   
3.    Software： SAS 9.4 TS Level 1M2
   
4.    Name: justsoso
   
5.    Date: 20180305
   
6.    From: Getting Started with the Graph Template Language in SAS:
   
7.          Examples, Tips, and Techniques for Creating Custom Graphs
   
8.    History: 20180305;
   
9. %mend;
   
10. 
    
11. ods _all_ close;     /*关闭所有ods destinations，避免不必要的输出，节省计算机资源*/
    
12. /*ods listing gpath='C:\Users\Administrator\Desktop\test20180305' image_dpi=300;*/
    
13. ods listing gpath='C:\Users\Administrator\Desktop\test20180305';
    
14. /*打开ods listing这一destination，指定图片保存路径，★★★★★需提前建立*/
    
15. /*ods graphics on / imagename="picture" outputfmt=pdf;*/
    
16. /*图片名称picture，输出类型pdf*/
    
17. ods graphics off;
    
18. 
    
19. /*Two Class Data Panel*/
    
20. proc template;
    
21. define statgraph Fig_5_3_1;
    
22. begingraph;
    
23. entrytitle 'Mileage by Horsepower by Type and Origin';
    
24. layout datapanel classvars=(origin type) / columns=3
    
25.       rowaxisopts=(griddisplay=on)
    
26.       columnaxisopts=(griddisplay=on);
    
27.    layout prototype ;
    
28.       scatterplot x=horsepower y=mpg_city / datatransparency=0.5
    
29.          markerattrs=(symbol=circlefilled);
    
30.    endlayout;
    
31. endlayout;
    
32. endgraph;
    
33. end;
    
34. run;
    
35. proc sgrender template=Fig_5_3_1
    
36. data=sashelp.cars(where=(type in ('Sedan', 'Sports')));
    
37. run;
    
38. 
    
39. ods _all_ close;
    
40. /*ods html;      最好将ods destination恢复至默认的html*/

复制代码

1. %macro comment();    /*这是一种比较特殊的注释方式*/
   
2.    Picture: Data Panel with One Class Variable (using template and sgrender procedure)
   
3.    Software： SAS 9.4 TS Level 1M2
   
4.    Name: justsoso
   
5.    Date: 20180305
   
6.    From: Getting Started with the Graph Template Language in SAS:
   
7.          Examples, Tips, and Techniques for Creating Custom Graphs
   
8.    History: 20180305;
   
9. %mend;
   
10. 
    
11. ods _all_ close;     /*关闭所有ods destinations，避免不必要的输出，节省计算机资源*/
    
12. /*ods listing gpath='C:\Users\Administrator\Desktop\test20180305' image_dpi=300;*/
    
13. ods listing gpath='C:\Users\Administrator\Desktop\test20180305';
    
14. /*打开ods listing这一destination，指定图片保存路径，★★★★★需提前建立*/
    
15. /*ods graphics on / imagename="picture" outputfmt=pdf;*/
    
16. /*图片名称picture，输出类型pdf*/
    
17. ods graphics off;
    
18. 
    
19. /*Data Panel with One Class Variable*/
    
20. proc template;
    
21. define statgraph Fig_5_3_2;
    
22. begingraph;
    
23. entrytitle 'Mileage by Type and Origin';
    
24. layout datapanel classvars=(origin) / headerlabeldisplay=value
    
25.       rowaxisopts=(griddisplay=on offsetmin=0) /*条形图从x轴开始*/
    
26.       columnaxisopts=(display=(ticks tickvalues)
    
27.       tickvalueattrs=(size=7));
    
28.    layout prototype;
    
29.       barchart x=type y=mpg_city / stat=mean dataskin=gloss
    
30.          datatransparency=0.3 barlabel=true;
    
31.    endlayout;
    
32. endlayout;
    
33. endgraph;
    
34. end;
    
35. run;
    
36. proc sgrender template=Fig_5_3_2
    
37. data=sashelp.cars(where=(type not in ('Hybrid', 'Wagon')));
    
38. format mpg_city 4.1;
    
39. run;
    
40. 
    
41. ods _all_ close;
    
42. /*ods html;      最好将ods destination恢复至默认的html*/

复制代码

1. %macro comment();    /*这是一种比较特殊的注释方式*/
   
2.    Picture: Data Panel with One Class Variable and Number of Columns
   
3.             (using template and sgrender procedure)
   
4.    Software： SAS 9.4 TS Level 1M2
   
5.    Name: justsoso
   
6.    Date: 20180305
   
7.    From: Getting Started with the Graph Template Language in SAS:
   
8.          Examples, Tips, and Techniques for Creating Custom Graphs
   
9.    History: 20180305;
   
10. %mend;
    
11. 
    
12. ods _all_ close;     /*关闭所有ods destinations，避免不必要的输出，节省计算机资源*/
    
13. /*ods listing gpath='C:\Users\Administrator\Desktop\test20180305' image_dpi=300;*/
    
14. ods listing gpath='C:\Users\Administrator\Desktop\test20180305';
    
15. /*打开ods listing这一destination，指定图片保存路径，★★★★★需提前建立*/
    
16. /*ods graphics on / imagename="picture" outputfmt=pdf;*/
    
17. /*图片名称picture，输出类型pdf*/
    
18. ods graphics off;
    
19. 
    
20. /*Data Panel with One Class Variable and Number of Columns*/
    
21. proc template;
    
22. define statgraph Fig_5_3_3;
    
23. begingraph;
    
24. entrytitle 'Mileage by Type and Origin';
    
25. layout datapanel classvars=(origin) / headerlabeldisplay=value
    
26.       rowaxisopts=(griddisplay=on offsetmin=0) columns=3
    
27.       columnaxisopts=(display=(ticks tickvalues)
    
28.       tickvalueattrs=(size=6));
    
29.    layout prototype;
    
30.       barchart x=type y=mpg_city / stat=mean dataskin=gloss
    
31.          datatransparency=0.3 barlabel=true;
    
32.    endlayout;
    
33. endlayout;
    
34. endgraph;
    
35. end;
    
36. run;
    
37. proc sgrender template=Fig_5_3_3
    
38. data=sashelp.cars(where=(type not in ('Hybrid', 'Wagon')));
    
39. format mpg_city 4.1;
    
40. run;
    
41. 
    
42. ods _all_ close;
    
43. /*ods html;      最好将ods destination恢复至默认的html*/

复制代码

1. %macro comment();    /*这是一种比较特殊的注释方式*/
   
2.    Picture: Data Panel with One Class Variable, Columns, and Union
   
3.             (using template and sgrender procedure)
   
4.    Software： SAS 9.4 TS Level 1M2
   
5.    Name: justsoso
   
6.    Date: 20180305
   
7.    From: Getting Started with the Graph Template Language in SAS:
   
8.          Examples, Tips, and Techniques for Creating Custom Graphs
   
9.    History: 20180305;
   
10. %mend;
    
11. 
    
12. ods _all_ close;     /*关闭所有ods destinations，避免不必要的输出，节省计算机资源*/
    
13. /*ods listing gpath='C:\Users\Administrator\Desktop\test20180305' image_dpi=300;*/
    
14. ods listing gpath='C:\Users\Administrator\Desktop\test20180305';
    
15. /*打开ods listing这一destination，指定图片保存路径，★★★★★需提前建立*/
    
16. /*ods graphics on / imagename="picture" outputfmt=pdf;*/
    
17. /*图片名称picture，输出类型pdf*/
    
18. ods graphics off;
    
19. 
    
20. /*Data Panel with One Class Variable, Columns, and Union*/
    
21. proc template;
    
22. define statgraph Fig_5_3_4;
    
23. begingraph;
    
24. entrytitle 'Mileage by Type and Origin';
    
25. layout datapanel classvars=(origin) / headerlabeldisplay=value
    
26.       rowaxisopts=(griddisplay=on offsetmin=0) columns=3
    
27.       columndatarange=union columnaxisopts=(display=(ticks/*columndatarange=*/
    
28.       tickvalues) tickvalueattrs=(size=6));
    
29.    layout prototype;
    
30.       barchart x=type y=mpg_city / stat=mean dataskin=gloss
    
31.          datatransparency=0.3 barlabel=true;
    
32.    endlayout;
    
33. endlayout;
    
34. endgraph;
    
35. end;
    
36. run;
    
37. proc sgrender template=Fig_5_3_4
    
38. data=sashelp.cars(where=(type not in ('Hybrid', 'Wagon')));
    
39. format mpg_city 4.1;
    
40. run;
    
41. 
    
42. ods _all_ close;
    
43. /*ods html;      最好将ods destination恢复至默认的html*/

复制代码

1. %macro comment();    /*这是一种比较特殊的注释方式*/
   
2.    Picture: Data Panel with One Class Variable and Proportional Columns
   
3.             (using template and sgrender procedure)
   
4.    Software： SAS 9.4 TS Level 1M2
   
5.    Name: justsoso
   
6.    Date: 20180305
   
7.    From: Getting Started with the Graph Template Language in SAS:
   
8.          Examples, Tips, and Techniques for Creating Custom Graphs
   
9.    History: 20180305;
   
10. %mend;
    
11. 
    
12. ods _all_ close;     /*关闭所有ods destinations，避免不必要的输出，节省计算机资源*/
    
13. /*ods listing gpath='C:\Users\Administrator\Desktop\test20180305' image_dpi=300;*/
    
14. ods listing gpath='C:\Users\Administrator\Desktop\test20180305';
    
15. /*打开ods listing这一destination，指定图片保存路径，★★★★★需提前建立*/
    
16. /*ods graphics on / imagename="picture" outputfmt=pdf;*/
    
17. /*图片名称picture，输出类型pdf*/
    
18. ods graphics off;
    
19. 
    
20. /*Data Panel with One Class Variable and Proportional Columns*/
    
21. proc template; /*--SAS 9.4--*/
    
22. define statgraph Fig_5_3_5;
    
23. begingraph;
    
24. entrytitle 'Mileage by Type and Origin';
    
25. layout datapanel classvars=(origin) / headerlabeldisplay=value
    
26.       rowaxisopts=(griddisplay=on offsetmin=0) columns=3
    
27.       columnweight=proportional columnaxisopts=/*columnweight=是关键！*/
    
28.       (display=(ticks tickvalues) tickvalueattrs=(size=7));
    
29.    layout prototype;
    
30.       barchart x=type y=mpg_city / stat=mean dataskin=gloss
    
31.          datatransparency=0.3 barlabel=true;
    
32.    endlayout;
    
33. endlayout;
    
34. endgraph;
    
35. end;
    
36. run;
    
37. proc sgrender template=Fig_5_3_5
    
38. data=sashelp.cars(where=(type not in ('Hybrid', 'Wagon')));
    
39. format mpg_city 4.1;
    
40. run;
    
41. 
    
42. ods _all_ close;
    
43. /*ods html;      最好将ods destination恢复至默认的html*/

复制代码

1. %macro comment();    /*这是一种比较特殊的注释方式*/
   
2.    Picture: Data Panel with Side Bar
   
3.             (using template and sgrender procedure)
   
4.    Software： SAS 9.4 TS Level 1M2
   
5.    Name: justsoso
   
6.    Date: 20180305
   
7.    From: Getting Started with the Graph Template Language in SAS:
   
8.          Examples, Tips, and Techniques for Creating Custom Graphs
   
9.    History: 20180305;
   
10. %mend;
    
11. 
    
12. ods _all_ close;     /*关闭所有ods destinations，避免不必要的输出，节省计算机资源*/
    
13. /*ods listing gpath='C:\Users\Administrator\Desktop\test20180305' image_dpi=300;*/
    
14. ods listing gpath='C:\Users\Administrator\Desktop\test20180305';
    
15. /*打开ods listing这一destination，指定图片保存路径，★★★★★需提前建立*/
    
16. /*ods graphics on / imagename="picture" outputfmt=pdf;*/
    
17. /*图片名称picture，输出类型pdf*/
    
18. ods graphics off;
    
19. 
    
20. /*Data Panel with Side Bar*/
    
21. proc template;
    
22. define statgraph Fig_5_3_6;
    
23. begingraph;
    
24. entrytitle 'Mileage by Type and Origin';
    
25. layout datapanel classvars=(origin) / headerlabeldisplay=value
    
26.       rowaxisopts=(label='Mileage' griddisplay=on offsetmin=0)
    
27.       columnaxisopts=(display=(ticks tickvalues)) columns=2;
    
28.    layout prototype / cycleattrs=true;
    
29.       barchart x=type y=mpg_city / stat=mean dataskin=gloss
    
30.          datatransparency=0.3 name='c' legendlabel='City';
    
31.       barchart x=type y=mpg_highway / stat=mean dataskin=gloss
    
32.          barwidth=0.5 datatransparency=0.3 name='h'
    
33.          legendlabel='Highway';
    
34.    endlayout;
    
35.    sidebar / spacefill=false;
    
36.       discretelegend 'c' 'h';
    
37.    endsidebar;
    
38. endlayout;
    
39. endgraph;
    
40. end;
    
41. run;
    
42. proc sgrender template=Fig_5_3_6
    
43. data=sashelp.cars(where=(type not in ('Hybrid', 'Truck', 'Wagon')));
    
44. run;
    
45. 
    
46. ods _all_ close;
    
47. /*ods html;      最好将ods destination恢复至默认的html*/

复制代码

1. %macro comment();    /*这是一种比较特殊的注释方式*/
   
2.    Picture: Data Panel with Multi-Page Output
   
3.             (using template and sgrender procedure)
   
4.    Software： SAS 9.4 TS Level 1M2
   
5.    Name: justsoso
   
6.    Date: 20180305
   
7.    From: Getting Started with the Graph Template Language in SAS:
   
8.          Examples, Tips, and Techniques for Creating Custom Graphs
   
9.    History: 20180305;
   
10. %mend;
    
11. 
    
12. /*--Fig 5.2.7 Labs2--*/
    
13. data GTL_GS_Labs2;
    
14.   pi=constant('PI');
    
15.   do Lab='Lab-1', 'Lab-2', 'Lab-3', 'Lab-4', 'Lab-5', 'Lab-6';
    
16.     amp=100*ranuni(4);
    
17.         phase=2*pi*ranuni(3);
    
18.     do day=1 to 300 by 5;
    
19.           Value=amp*(1+0.1*(sin(day*pi/180+phase)+0.2*ranuni(5)));
    
20.           output;
    
21.         end;
    
22.   end;
    
23. run;
    
24. 
    
25. ods _all_ close;     /*关闭所有ods destinations，避免不必要的输出，节省计算机资源*/
    
26. /*ods listing gpath='C:\Users\Administrator\Desktop\test20180305' image_dpi=300;*/
    
27. ods listing gpath='C:\Users\Administrator\Desktop\test20180305';
    
28. /*打开ods listing这一destination，指定图片保存路径，★★★★★需提前建立*/
    
29. /*ods graphics on / imagename="picture" outputfmt=pdf;*/
    
30. /*图片名称picture，输出类型pdf*/
    
31. ods graphics off;
    
32. 
    
33. /*Data Panel with Multi-Page Output*/
    
34. proc template;
    
35. define statgraph Fig_5_3_7;
    
36. begingraph;
    
37. entrytitle 'Lab Value by Day';
    
38. layout datapanel classvars=(lab) / headerlabeldisplay=value
    
39.       rowaxisopts=(label='Value' griddisplay=on
    
40.       tickvalueattrs=(size=7))
    
41.       columnaxisopts=(display=(ticks tickvalues)
    
42.       tickvalueattrs=(size=7))
    
43.       rowdatarange=union rows=2 columns=1 rowgutter=5;
    
44.    layout prototype / cycleattrs=true;
    
45.       seriesplot x=day y=value /
    
46.          lineattrs=graphdata2(thickness=2 pattern=solid);
    
47.    endlayout;
    
48. endlayout;
    
49. endgraph;
    
50. end;
    
51. run;
    
52. proc sgrender template=Fig_5_3_7 data=GTL_GS_Labs2;
    
53. run;
    
54. 
    
55. ods _all_ close;
    
56. /*ods html;      最好将ods destination恢复至默认的html*/

复制代码

1. %macro comment();    /*这是一种比较特殊的注释方式*/
   
2.    Picture: Row Lattice with Independent Axes
   
3.             (using template and sgrender procedure)
   
4.    Software： SAS 9.4 TS Level 1M2
   
5.    Name: justsoso
   
6.    Date: 20180305
   
7.    From: Getting Started with the Graph Template Language in SAS:
   
8.          Examples, Tips, and Techniques for Creating Custom Graphs
   
9.    History: 20180305;
   
10. %mend;
    
11. 
    
12. ods _all_ close;     /*关闭所有ods destinations，避免不必要的输出，节省计算机资源*/
    
13. /*ods listing gpath='C:\Users\Administrator\Desktop\test20180305' image_dpi=300;*/
    
14. ods listing gpath='C:\Users\Administrator\Desktop\test20180305';
    
15. /*打开ods listing这一destination，指定图片保存路径，★★★★★需提前建立*/
    
16. /*ods graphics on / imagename="picture" outputfmt=pdf;*/
    
17. /*图片名称picture，输出类型pdf*/
    
18. ods graphics off;
    
19. 
    
20. /*Row Lattice with Independent Axes*/
    
21. proc template;
    
22. define statgraph Fig_5_4_1;
    
23. begingraph;
    
24. entrytitle 'Mileage by Origin and Type';
    
25. layout lattice;
    
26.    layout overlay / yaxisopts=(griddisplay=on);/*图1*/
    
27.       barchart x=origin y=mpg_city / stat=mean dataskin=gloss
    
28.       group=drivetrain groupdisplay=cluster;
    
29.    endlayout;
    
30.    layout overlay / yaxisopts=(griddisplay=on);/*图2*/
    
31.       boxplot x=type y=mpg_city / fillattrs=graphdata2;
    
32.    endlayout;
    
33. endlayout;
    
34. endgraph;
    
35. end;
    
36. run;
    
37. proc sgrender template=Fig_5_4_1
    
38. data=sashelp.cars(where=(type ne 'Hybrid'));
    
39. run;
    
40. 
    
41. ods _all_ close;
    
42. /*ods html;      最好将ods destination恢复至默认的html*/

复制代码

1. %macro comment();    /*这是一种比较特殊的注释方式*/
   
2.    Picture: Row Lattice with Common Axis
   
3.             (using template and sgrender procedure)
   
4.    Software： SAS 9.4 TS Level 1M2
   
5.    Name: justsoso
   
6.    Date: 20180305
   
7.    From: Getting Started with the Graph Template Language in SAS:
   
8.          Examples, Tips, and Techniques for Creating Custom Graphs
   
9.    History: 20180305;
   
10. %mend;
    
11. 
    
12. ods _all_ close;     /*关闭所有ods destinations，避免不必要的输出，节省计算机资源*/
    
13. /*ods listing gpath='C:\Users\Administrator\Desktop\test20180305' image_dpi=300;*/
    
14. ods listing gpath='C:\Users\Administrator\Desktop\test20180305';
    
15. /*打开ods listing这一destination，指定图片保存路径，★★★★★需提前建立*/
    
16. /*ods graphics on / imagename="picture" outputfmt=pdf;*/
    
17. /*图片名称picture，输出类型pdf*/
    
18. ods graphics off;
    
19. 
    
20. /*Row Lattice with Common Axis*/
    
21. proc template;
    
22. define statgraph Fig_5_4_2;
    
23. begingraph;
    
24. entrytitle 'Mileage and Horsepower by Type';
    
25. layout lattice / columndatarange=union;/*各管各的*/
    
26.    columnaxes;/*设置公共的列坐标*/
    
27.       columnaxis / display=(ticks tickvalues);
    
28.    endcolumnaxes;
    
29.    layout overlay / yaxisopts=(griddisplay=on);/*图1*/
    
30.       barchart x=type y=mpg_city / stat=mean dataskin=gloss
    
31.          group=drivetrain groupdisplay=cluster;
    
32.    endlayout;
    
33.    layout overlay / yaxisopts=(griddisplay=on);/*图2*/
    
34.       boxplot x=type y=horsepower / fillattrs=graphdata2;
    
35.    endlayout;
    
36. endlayout;
    
37. endgraph;
    
38. end;
    
39. run;
    
40. proc sgrender template=Fig_5_4_2
    
41. data=sashelp.cars(where=(type ne 'Hybrid'));
    
42. run;
    
43. 
    
44. ods _all_ close;
    
45. /*ods html;      最好将ods destination恢复至默认的html*/

复制代码

1. %macro comment();    /*这是一种比较特殊的注释方式*/
   
2.    Picture: Row Lattice with Common Axis and Unequal Weights
   
3.             (using template and sgrender procedure)
   
4.    Software： SAS 9.4 TS Level 1M2
   
5.    Name: justsoso
   
6.    Date: 20180305
   
7.    From: Getting Started with the Graph Template Language in SAS:
   
8.          Examples, Tips, and Techniques for Creating Custom Graphs
   
9.    History: 20180305;
   
10. %mend;
    
11. 
    
12. ods _all_ close;     /*关闭所有ods destinations，避免不必要的输出，节省计算机资源*/
    
13. /*ods listing gpath='C:\Users\Administrator\Desktop\test20180305' image_dpi=300;*/
    
14. ods listing gpath='C:\Users\Administrator\Desktop\test20180305';
    
15. /*打开ods listing这一destination，指定图片保存路径，★★★★★需提前建立*/
    
16. /*ods graphics on / imagename="picture" outputfmt=pdf;*/
    
17. /*图片名称picture，输出类型pdf*/
    
18. ods graphics off;
    
19. 
    
20. /*Row Lattice with Common Axis and Unequal Weights*/
    
21. proc template;
    
22. define statgraph Fig_5_4_3;
    
23. begingraph;
    
24. entrytitle 'Distribution of Mileage';
    
25. layout lattice / columndatarange=union rowweights=(0.8 0.2);/*单元比例*/
    
26.    columnaxes;
    
27.       columnaxis / display=(ticks tickvalues);
    
28.    endcolumnaxes;
    
29.    layout overlay / yaxisopts=(griddisplay=on);
    
30.       histogram mpg_city / binaxis=false;
    
31.       densityplot mpg_city / lineattrs=graphfit name='n'
    
32.          legendlabel='Normal';
    
33.       densityplot mpg_city / kernel() lineattrs=graphfit2 name='k'
    
34.          legendlabel='Kernel';
    
35.       discretelegend 'n' 'k' / location=inside across=1
    
36.          halign=right valign=top ;
    
37.    endlayout;
    
38.    layout overlay / yaxisopts=(griddisplay=on);
    
39.       boxplot y=mpg_city / orient=horizontal;
    
40.    endlayout;
    
41. endlayout;
    
42. endgraph;
    
43. end;
    
44. run;
    
45. proc sgrender template=Fig_5_4_3
    
46. data=sashelp.cars(where=(type ne 'Hybrid'));
    
47. run;
    
48. 
    
49. ods _all_ close;
    
50. /*ods html;      最好将ods destination恢复至默认的html*/

复制代码