写一个宏,产生随机数,代码如下:
* 产生随机数.
* 宏DATAGEN含有三个参数:OBS(观察值,即个案数)、VARS(变量数)、SD(种子).
DEFINE !DATAGEN (OBS=!TOKENS(1) !DEFAULT(1000)
/VARS=!TOKENS(1) !DEFAULT(10)
/SD=!TOKENS(1) !DEFAULT(1)).
NEW FILE.
INPUT PROGRAM.
VECTOR X(!VARS).
LOOP #I=1 TO !OBS.
LOOP #J=1 TO !VARS.
COMPUTE X(#J)=NORMAL(!SD).
END LOOP.
END CASE.
END LOOP.
END FILE.
END INPUT PROGRAM.
LIST.
!LET !LIST=!NULL
!DO !I=1 !TO !VARS
!LET !LIST=!CONCAT(!LIST,' ','X',!I)
!DOEND
DESCRIPTIVES VARIABLES !LIST.
!ENDDEFINE.
* 执行宏.
!DATAGEN OBS=2000 VARS=20 SD=2.
现运行该宏有问题,已检查多次,不知何故,特向各位请教!