使用SAS Do循环实现实验数据录入的技术求助

嘿，刚上手SAS循环就用来处理实验数据，这个思路太赞了！我帮你写了两段嵌套Do循环的代码，完美匹配你的需求——不管是要18条还是对应“各2组”的36条观测，都能搞定，还自动生成1到N的Obs_no序号。

版本1：生成18条观测（匹配你说的总条数） #

这段代码会生成正好18条数据，对应：6种处理（1-6）、6个提示（视觉1-3 + 听觉1-3）、3种延迟时长（5/10/15秒），每个处理-提示组合对应所有延迟：

data experiment_data;
  /* 初始化观测序号计数器 */
  obs_no = 0;
  
  /* 循环生成提示类型（视觉/听觉）和编号（1-3） */
  do prompt_type = '视觉', '听觉';
    do prompt_num = 1 to 3;
      /* 组合成清晰的提示名称，比如"视觉 1" */
      prompt = catx(' ', prompt_type, prompt_num);
      
      /* 自动匹配处理编号：视觉对应1-3，听觉对应4-6 */
      treatment = prompt_num + (prompt_type = '听觉') * 3;
      
      /* 循环遍历3种延迟时长 */
      do delay = 5, 10, 15;
        obs_no + 1; /* 序号自增 */
        output; /* 输出当前观测 */
      end;
    end;
  end;
  
  /* 给变量加标签，让数据集更易读 */
  label obs_no = '观测序号'
        treatment = '处理编号'
        prompt = '提示类型及编号'
        delay = '延迟时长(秒)';
run;

/* 查看生成的结果 */
proc print data=experiment_data noobs;
run;

代码逻辑说明： #

• 用三层嵌套Do循环依次生成提示类型、提示编号、延迟时长，自动组合所有需要的变量；
• 通过(prompt_type = '听觉') * 3这个小技巧，快速把听觉提示的处理编号偏移到4-6，不用写两次重复的循环；
• 每生成一组完整的变量组合，就把序号加1并输出，保证Obs_no从1到18连续递增。

版本2：生成36条观测（匹配"延迟各2组"的描述） #

如果你的实验设计确实需要每个延迟时长对应2组，只需要在延迟循环里再加一层组循环就行，这样总观测数变成6×3×2=36：

data experiment_data;
  obs_no = 0;
  
  do prompt_type = '视觉', '听觉';
    do prompt_num = 1 to 3;
      prompt = catx(' ', prompt_type, prompt_num);
      treatment = prompt_num + (prompt_type = '听觉') * 3;
      
      do delay = 5, 10, 15;
        /* 添加组循环，每个延迟对应2组 */
        do group = 1 to 2;
          obs_no + 1;
          output;
        end;
      end;
    end;
  end;
  
  label obs_no = '观测序号'
        treatment = '处理编号'
        prompt = '提示类型及编号'
        delay = '延迟时长(秒)'
        group = '组号';
run;

调整小技巧： #

如果处理和提示的对应关系不是视觉1-3对应处理1-3，你可以直接修改treatment的赋值逻辑，比如改成独立的do treatment = 1 to 6;循环，灵活度很高。

多跑几次代码看看结果，很快就能掌握SAS Do循环的精髓啦！

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