【请特别注意:在后面所有的程序命令中的行号仅服务于注释的需要,在买 际指令中不能放入! 表13-6 改造例1原始数据的程序命令 1 INPUT PROGRAM 3 DATA LIST FILE='C:\EHA SPSS\EX1. DAT 4 /ID 1-3 SEX 5 AGE 7-8 RACE 10 EDU 12 NUMSPELL 14 #X1TO#X24(1x,8(3F3.0)) LEAVE工 D TO NUMSPELI 9 VECTOR V=#X1 TO #X24 10 LOOP #I-1 To 24 BY 3 11 COMPUTE DI=YRMODA(V(#I),V(#I+1),V(#I+2)) 12 COMPUTE D2=YRMODA(V(#I+3),V(#I+4),V(#I+5)) 13 COMPUTE DURA=D2-D1 4 END CASE 5 END LOOP IF MISSING(V(#I+3) 17ENDI、 PUT PROGRAM 19 COMPUTE EVENT=l 20 IF (SYSMIS(DURA)) EVENT=O 21 IF (SYSMIS(DURA))DURA=YRMODA(80,1,1)-D1 22 LIST VAR=ID TO NUMSPELL DURA EVENT 24 SAVE OUTF-LE='C: \EHA SPSS \EXI. SAV 注:本书所跗磁盘提供此SS程序.文件名为EX1!.SS 例1程序命令注释 第Ⅰ行命令 INPUT PROGRAM.标志开始输入数据的定义和改造数据的命 令这一命令用在这里是因为我们要从所读的不定长的每条记录中建立一个 或多个工作数据文件的案例 x第3行 DATA IⅠST命令指示从原始数据文件中读取数据记录,并提供原始文 件名称及所在位置(磁盘驱动器和子目录) ←第↓行继续上述命令,说明毎条原始记录中前14位数分别按固定长度格式读 入6个变量,其中第14位是变量 NUMSPELL(意为发生次数) 第5行仍是上述命令的延续部分,表示后面将定义24个同样格式的SPSS内 部使用的暂用变量( scratch variables),它们在读入时是每3个变量一组(分 别用来表示年、月、日)、每个变量为3位数字(即3F3.0)。那么24个同格 式变量实际可以恰好包含8个日期。24这个数量是事先决定的,它必须是3