SAS中PPETHMREC变量频率表结果异常求助

我生成的PPETHMREC变量频率表/图表与实际数据不符。该变量已通过以下SAS代码完成重编码，但频率表仅显示单一结果（100%为Non-Hispanic），与实际情况不符；而PPRACEM变量的频率表结果正常。我尝试过重新赋值、重写格式与编码步骤，但均未解决问题，无法定位错误。

相关SAS代码 #

/* Read in the data and create a new dataset */
data work.ITDemogRecodes;
   set work.ITDemogRecodes;
   
/* Recode variables */
    if PPETHM = 1 then PPETHMREC = 1;
    else if PPETHM = 2 then PPETHMREC = 1;
    else if PPETHM = 3 then PPETHMREC = 1;
    else if PPETHM = 4 then PPETHMREC = 2;
    else if PPETHM = 5 then PPETHMREC = 1;
    
/* add labels to variables */
label PPETHM = "What is your Ethnicity?"
      PPRACEM = "What is your Race?"
      PPETHMREC = "What is your Ethnicity?";
      
/* create formats*/
proc format;
   value race
   1 = 'White'
   2 = 'Black or African American'
   3 = 'American Indian or Alaska Native'
   4 = 'Asian'
   5 = 'Native Hawaiian/Pacific Islander'
   6 = '2+ Races'
   7 = 'Other';
   
   value ethm
   1 = 'White, Non-Hispanic'
   2 = 'Black, Non-Hispanic'
   3 = 'Other, Non-Hispanic'
   4 = 'Hispanic'
   5 = '2+ Races, Non-Hispanic';
   
   value ethmrec
   1 = 'Non-Hispanic'
   2 = 'Hispanic';
   
/* format variables */
data work.ITDemogRecodes;
   set work.ITDemogRecodes;
   FORMAT PPETHM ethm.
          PPETHMREC ethmrec.
          PPRACEM race.;
   run;
   
/* create frequency chart */
proc freq data=work.ITDemogRecodes;
  tables PPETHMREC PPRACEM / out=freq_out;
  run;

问题排查与修正方案 #

1. 核心语法错误：Proc Format嵌套在Data步内 #

SAS中Data步和Proc步是独立的执行单元，不能嵌套。原代码将proc format放在第一个data work.ITDemogRecodes;步内部，这会导致代码执行异常：要么格式未被正确创建，要么Data步的重编码逻辑未被完整执行。

2. 数据覆盖风险：Data步读取并写入同一数据集 #

第一个Data步使用set work.ITDemogRecodes;同时读取和写入同一数据集，虽然SAS允许这种操作，但容易导致数据意外覆盖或逻辑混乱，不推荐。

修正后的代码 #

/* 1. 先创建所需格式（独立于Data步） */
proc format;
   value race
   1 = 'White'
   2 = 'Black or African American'
   3 = 'American Indian or Alaska Native'
   4 = 'Asian'
   5 = 'Native Hawaiian/Pacific Islander'
   6 = '2+ Races'
   7 = 'Other';
   
   value ethm
   1 = 'White, Non-Hispanic'
   2 = 'Black, Non-Hispanic'
   3 = 'Other, Non-Hispanic'
   4 = 'Hispanic'
   5 = '2+ Races, Non-Hispanic';
   
   value ethmrec
   1 = 'Non-Hispanic'
   2 = 'Hispanic';
run;

/* 2. 读取原始数据，重编码并添加标签（使用新数据集名避免覆盖） */
data work.ITDemogRecodes_New;
   set work.ITDemogRecodes;
   
   /* 重编码PPETHMREC，简化逻辑 */
   if PPETHM in (1,2,3,5) then PPETHMREC = 1;
   else if PPETHM = 4 then PPETHMREC = 2;
   /* 可选：处理缺失或其他未定义取值 */
   else PPETHMREC = .;
   
   /* 添加变量标签 */
   label PPETHM = "What is your Ethnicity?"
         PPRACEM = "What is your Race?"
         PPETHMREC = "What is your Ethnicity?";
         
   /* 应用格式 */
   FORMAT PPETHM ethm.
          PPETHMREC ethmrec.
          PPRACEM race.;
run;

/* 3. 生成频率表，添加missing选项显示缺失值 */
proc freq data=work.ITDemogRecodes_New;
  tables PPETHMREC PPRACEM / out=freq_out missing;
run;

额外验证步骤 #

• 先执行proc freq data=work.ITDemogRecodes; tables PPETHM; run;，确认原始PPETHM变量的取值分布，检查是否存在取值为4的记录（对应Hispanic）。
• 通过proc print data=work.ITDemogRecodes_New (obs=20); var PPETHM PPETHMREC; run;查看样本数据，验证重编码结果是否符合预期。

内容的提问来源于stack exchange，提问作者Noah Chirico