SAS编程基础：数据分组与文本文件处理实践

在SAS编程中，我们首先讨论的是一个关于数据集操作的问题。题目要求我们在SAS程序中实现对数据集WORK.SALARY进行分组求和，具体是在每个部门（Department）内按照性别（Gender）累积工资总额（Payroll）。根据提供的代码片段，我们需要插入适当的条件来确定何时开始和结束累加子总和。选项A "Gender" 表示仅按性别累加，B "Department" 表示仅按部门累加，C "GenderDepartment" 的顺序可能表示先按性别后按部门，而D "DepartmentGender" 则表示先按部门后按性别。考虑到题目中提到的"ifFirst" 和 "ifLast"，表明我们需要在开始和结束某次累加时设置标志，所以最合理的插入代码可能是： ```SAS if First.Department then Payroll=0; /* 开始累加 */ Payroll + WageRate; /* 每次记录都累加工资 */ if Last.Department; /* 结束当前部门的累加 */ ``` 这表示在进入新部门时初始化Payroll为0，并在遇到下一个部门的开始时停止当前部门的累加。因此，正确答案是B "Department"。 接下来的问题涉及文本文件数据的处理，目标是读取TXT文件，按月份和状态分类，并将每周的数据整合到输出表中。给出的代码片段展示了如何定义一个新的数据集WORK.NUMBERS，通过`INFILE`语句导入数据，然后根据月份（Month）条件分别输入每周的数据。对于'FEB'的记录，会读入Week1到Week4以及Status，而对于'MAR'，则是Week1到Week5。因此，正确读取并组合数据的SAS程序应该包括这些步骤： ```SAS data WORK.NUMBERS; length Name $4 Month $3 Status $7; infile 'TEXTFILE.TXT' dsd dlm='|'; /* 以竖线分隔符读取 */ input Name $ Month $ Week1-Week5 Status $; /* 输入字段并跳过未提及的周 */ if Month = 'FEB' then do; /* 处理FEB记录 */ output; end; else if Month = 'MAR' then do; /* 处理MAR记录 */ output; end; run; ``` 这个程序将读取数据、按月份分组并在指定格式下输出所需结果。最后的输出表会包含姓名（Obs）、月份（Month）、状态（Status）和对应的每周数值（Week1-Week5）。