《直接输出科研论文统计表格的SAS宏》中sas宏的疑问-经管之家官网!

人大经济论坛-经管之家 收藏本站
您当前的位置> 软件培训>>

SAS软件培训

>>

《直接输出科研论文统计表格的SAS宏》中sas宏的疑问

《直接输出科研论文统计表格的SAS宏》中sas宏的疑问

发布:dahufa123 | 分类:SAS软件培训

关于本站

人大经济论坛-经管之家:分享大学、考研、论文、会计、留学、数据、经济学、金融学、管理学、统计学、博弈论、统计年鉴、行业分析包括等相关资源。
经管之家是国内活跃的在线教育咨询平台!

获取电子版《CDA一级教材》

完整电子版已上线CDA网校,累计已有10万+在读~ 教材严格按考试大纲编写,适合CDA考生备考,也适合业务及数据分析岗位的从业者提升自我。

完整电子版已上线CDA网校,累计已有10万+在读~ 教材严格按考试大纲编写,适合CDA考生备考,也适合业务及数据分析岗位的从业者提升自我。

北大刘建蒙教授2010年在《中国卫生统计》上发表的文章《直接输出科研论文统计表格的SAS宏》文后附录了一个较完整的sas宏(省略了数值变量的统计),我将其抄下来在sas中运行发现有错误,能告诉我我哪错了还是程序有错 ...
免费学术公开课,扫码加入


北大刘建蒙教授2010年在《中国卫生统计》上发表的文章《直接输出科研论文统计表格的SAS宏》文后附录了一个较完整的sas宏(省略了数值变量的统计),我将其抄下来在sas中运行发现有错误,能告诉我我哪错了还是程序有错误?

  1. /* 调用宏前的准备*/
  2. /* 定义分类变量的类别*/
  3. /* 定义数值变量的缺失值*/
  4. /* 定义基线特征变量标签*/
  5. /* 定义宏变量*/
  6. /* 说明:
  7. Dataset指拟分析的数据集;
  8. Group指分组变量;
  9. Cat_var指分类变量名;
  10. Cat_index 指基线表中该分类变量的顺次;
  11. Cat_n分类变量的总数;
  12. Num_var指数值变量名;
  13. Num_index指基线表中该数值变量的顺次;
  14. Num_n数值变量的总数;
  15. */
  16. %LET Dataset=ss;
  17. %LET Group=s;
  18. %LET Cat_var=%str(AA);
  19. %LET Cat_index=%str(1);
  20. %LET Cat_n=1;
  21. %LET Num_var=%str(Age height weight fee);
  22. %LET Num_index=%str(2 3 4 5);
  23. %LET Num_n=4;
  24. /* 宏主体及解释*/
  25. /* 宏名称为Baseline, 由4步生成*/
  26. %MACRO Baseline;

  27. /* 步骤1. 生成分类变量的输出要素*/
  28. /* 生成频数数据集*/

  29. %MACRO Stepa;
  30. DATA Freq_a;
  31. SET &Dataset;
  32. Treat=(&Group=1)*1+(&Group=2)*0;
  33. Control=(&Group=1)*0+(&Group=2)*1;
  34. RUN;

  35. PROC MEANS DATA=Freq_a NOPRINT;
  36. CLASS &Cat_var;
  37. VAR Treat Control; OUTPUT OUT=Freq_b SUM=/AUTONAME;
  38. WAYS 1;
  39. RUN;

  40. %GLOBAL Total_treat Total_control;

  41. PROC SQL NOPRINT;
  42. SELECT COUNT(*) INTO:Total_treat FROM &Dataset WHERE &Group=1;
  43. SELECT COUNT(*) INTO:Total_control FROM &Dataset WHERE &Group=2;
  44. QUIT;

  45. DATA Freq_c;
  46. SET Freq_b;
  47. LENGTH Variable Level $200.;
  48. Treat=CATS(Treat_sum,"(", PUT((Treat_sum/&Total_treat)*100, 8.1),")");
  49. Control=CATS(Control_sum,"(",PUT((Control_sum/&Total_control)*100, 8.1),")");
  50. %DO i=1 %TO &CAT_n;
  51. IF %SCAN(&Cat_var,&i) THEN DO;
  52. Variable="%SCAN(&Cat_var,&i)";
  53. Index=%SCAN(&Cat_var,&i);
  54. Level=PUT(%SCAN(&Cat_var,&i),%SCAN(&Cat_var,&i).);
  55. /*
  56. 此处sas会提示错误,

  57. NOTE: 由宏函数“SCAN”生成行。
  58. 1 AA
  59. --
  60. 48
  61. ERROR 48-59: 输出格式 AA 没有找到或无法加载。

  62. */
  63. END;
  64. %END;
  65. RUN;

  66. /* 输出卡方值*/
  67. ODS LISTING CLOSE;
  68. ODS OUTPUT ChiSq=Freq_d;

  69. PROC FREQ DATA=&Dataset;
  70. TABLE &Group*(&Cat_var)/Chisq;
  71. RUN;

  72. ODS LISTING;

  73. DATA Freq_e(KEEP=Variable Prob);
  74. SET Freq_d;
  75. Variable=SCAN(Table,-1,"");
  76. WHERE Statistic="Chi-Square" or Statistic="卡方";
  77. RUN;

  78. /* 合并卡方与频数数据集*/
  79. PROC SORT DATA=Freq_c;
  80. BY Variable;

  81. PROC SORT DATA=Freq_e;
  82. BY Variable;
  83. RUN;

  84. DATA Freq_f;
  85. MERGE Freq_c Freq_e;
  86. BY Variable;
  87. KEEP Variable Level Treat Control Index Prob;
  88. RUN;

  89. %mend;

  90. %Stepa;

  91. /*步骤2. 生成数值变量的输出要素*/

  92. %MACRO Stepb;
  93. DATA Mean_f;RUN;/*此处建一空数据集代替*/
  94. /* 参考步骤1, 首先将T 检验的结果以均数(标准差) 、方差齐性检验和t检验3个数据集存储备用, 进而生成数值变量的输出要素*/
  95. %mend;

  96. %Stepb;

  97. /* 步骤3. 合并分类变量与数值变量输出要素, 并按顺序变量排序*/

  98. %MACRO Stepc;
  99. DATA Final;
  100. SET Freq_f Mean_f;
  101. RUN;

  102. PROC SORT DATA=Final;
  103. BY Index;
  104. RUN;
  105. %mend;

  106. %Stepc;

  107. /* 步骤4: 将输出元素以RTF类型输出并存至C盘根目录下的Example.rtf文件*/
  108. %MACRO Stepd;
  109. Options Nodate Nonumber Orientation=Portrait;
  110. ODS LISTING CLOSE;
  111. ODS RTF FILE="C:\Example.rtf" bodytitle;
  112. TITLE FONT="宋体" HEIGHT=10pt "表1 干预和对照组基线特征分布";

  113. PROC REPORT DATA=Final NOWD STYLE(REPORT)={BACKGROUND=WHITE RULES=GROUP FRAME=HSIDES CELLWIDTH=60%}
  114. STYLE(HEADER)={FONT_WEIGHT=LIGHT BACKGROUND=WHITE FONT_SIZE=10pt};
  115. COLUMN Variable Level Treat Control Prob;
  116. DEFINE Variable/GROUP ORDER=DATA "基线特征" STYLE(COLUMN)={JUST=LEFT} STYLE(HEADER)={JUST=LEFT};
  117. DEFINE Level/DISPLAY " " STYLE(COLUMN)={JUST=LEFT};
  118. DEFINE Treat/DISPLAY "治疗(n=%left(&total_treat))" STYLE(COLUMN)={JUST=RIGHT} STYLE(HEADER)={JUST=RIGHT};
  119. DEFINE Control/DISPLAY "对照(n=%left(&total_control))" STYLE(COLUMN)={JUST=RIGHT} STYLE(HEADER)={JUST=RIGHT};
  120. DEFINE Prob/GROUP "P" STYLE(COLUMN)={JUST=CENTER} STYLE(HEADER)={FONT_copycode($('code_Okp'));">复制代码
    「经管之家」APP:经管人学习、答疑、交友,就上经管之家!
    免流量费下载资料----在经管之家app可以下载论坛上的所有资源,并且不额外收取下载高峰期的论坛币。
    涵盖所有经管领域的优秀内容----覆盖经济、管理、金融投资、计量统计、数据分析、国贸、财会等专业的学习宝库,各类资料应有尽有。
    来自五湖四海的经管达人----已经有上千万的经管人来到这里,你可以找到任何学科方向、有共同话题的朋友。
    经管之家(原人大经济论坛),跨越高校的围墙,带你走进经管知识的新世界。
    扫描下方二维码下载并注册APP
本文关键词:

本文论坛网址:https://bbs.pinggu.org/thread-1125632-1-1.html

人气文章

1.凡人大经济论坛-经管之家转载的文章,均出自其它媒体或其他官网介绍,目的在于传递更多的信息,并不代表本站赞同其观点和其真实性负责;
2.转载的文章仅代表原创作者观点,与本站无关。其原创性以及文中陈述文字和内容未经本站证实,本站对该文以及其中全部或者部分内容、文字的真实性、完整性、及时性,不作出任何保证或承若;
3.如本站转载稿涉及版权等问题,请作者及时联系本站,我们会及时处理。
数据分析师 人大经济论坛 大学 专业 手机版
联系客服
值班时间:工作日(9:00--18:00)