解决实际问题之SAS画分组柱状-折线图

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

1. /*解决实际问题之SAS画分组柱状-折线图*/
   
2. data sbp;
   
3. input id age sbp hy;
   
4. cards;
   
5. 1        4        70        0
   
6. 2        4        75        1
   
7. 3        4        73        1
   
8. 4        5        76        1
   
9. 5        5        80        1
   
10. 6        5        78        1
    
11. 7        5        58        0
    
12. 8        6        80        1
    
13. 9        6        90        1
    
14. 10        7        76        0
    
15. 11        7        90        1
    
16. 12        7        98        1
    
17. 13        8        89        0
    
18. ;
    
19. 
    
20. proc sql noprint;
    
21. create table test1 as
    
22. select mean(sbp) as sbp_mean,
    
23. age
    
24. from sbp
    
25. group by age
    
26. order by age
    
27. ;
    
28. quit;
    
29. 
    
30. proc sql noprint;
    
31. create table test2 as
    
32. select count(hy) as hy1,
    
33. age
    
34. from sbp
    
35. where hy=1
    
36. group by age;
    
37. quit;
    
38. 
    
39. proc sql noprint;
    
40. create table test3 as
    
41. select count(hy) as hy0,
    
42. age,
    
43. from sbp
    
44. where hy=0
    
45. group by age;
    
46. quit;
    
47. 
    
48. proc sort data=test2;by age;run;
    
49. proc sort data=test3;by age;run;
    
50. data test4;
    
51. merge test2 test3;
    
52. by age;
    
53. if hy0=. then hy0=0;
    
54. else if hy1=. then hy1=0;
    
55. percent=hy1/(hy0+hy1);
    
56. format percent percent8.2;
    
57. run;
    
58. 
    
59. /*SAS 9.4 M2*/
    
60. proc sgplot data=test1 noautolegend;
    
61.   series x=age y=sbp_mean /
    
62.          lineattrs=(thickness=2 color="#00b8e5") dataskin=pressed
    
63.          markers markerattrs=(symbol=trianglefilled color=red size=10);
    
64.                  yaxis ranges=(0-90) label="sbp平均水平";
    
65.                  xaxis label="年龄";
    
66. run;
    
67. 
    
68. /*SAS 9.4 M3*/
    
69. proc sgplot data=test1 noautolegend;
    
70. vbarbasic age / response=sbp_mean dataskin=gloss fillattrs=(color="#00bc57")
    
71.          baselineattrs=(thickness=0) barwidth=0.7;
    
72.   series x=age y=sbp_mean / arrowheadpos=end arrowheadshape=filled
    
73.          lineattrs=(thickness=5 color="#00b8e5") dataskin=pressed
    
74.                  markers markerattrs=(symbol=circlefilled color=red size=15);
    
75.                  yaxis label="sbp平均水平";
    
76.                  xaxis label="年龄";
    
77. run;
    
78. 
    
79. /*SAS 9.4 M2*/
    
80. proc sgplot data=test4 noautolegend;
    
81.   series x=age y=percent /
    
82.          lineattrs=(thickness=5 color="#00bc57") dataskin=pressed
    
83.                  markers markerattrs=(symbol=circlefilled color=red size=15);
    
84.                  yaxis label="hy=1的百分比";
    
85.                  xaxis label="年龄";
    
86. run;
    
87. 
    
88. /*SAS 9.4 M3*/
    
89. proc sgplot data=test4 noautolegend;
    
90. vbarbasic age / response=percent dataskin=gloss fillattrs=(color="#00bc57")
    
91.          baselineattrs=(thickness=0) barwidth=0.7;
    
92.   series x=age y=percent / arrowheadpos=end arrowheadshape=filled
    
93.          lineattrs=(thickness=5 color="#00b8e5") dataskin=pressed
    
94.                  markers markerattrs=(symbol=circlefilled color=red size=10);
    
95.                  yaxis label="hy=1的百分比";
    
96.                  xaxis label="年龄";
    
97. run;

复制代码

扫码加我 拉你入群

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

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

分享0 收藏2 回帖

关键词：实际问题 折线图 proc sql Baseline response