thanks alot Mr. Steve this is the log 1 The SAS System 17:52 Monday, February 24, 2014 1 ;*';*";*/;quit;run; 2 OPTIONS PAGENO=MIN; 3 %LET _CLIENTTASKLABEL='222222222 after intiqam multi samples'; 4 %LET _CLIENTPROJECTPATH=''; 5 %LET _CLIENTPROJECTNAME=''; 6 %LET _SASPROGRAMFILE='F:\sas simulation final\sas cods program\222222222 after intiqam multi samples.sas'; 7 8 ODS _ALL_ CLOSE; 9 OPTIONS DEV=ACTIVEX; 10 GOPTIONS XPIXELS=0 YPIXELS=0; 11 FILENAME EGSR TEMP; 12 ODS tagsets.sasreport13(ID=EGSR) FILE=EGSR STYLE=HtmlBlue 12 ! STYLESHEET=(URL="file:///C:/Program%20Files/SASHome/SASEnterpriseGuide/5.1/Styles/HtmlBlue.css") NOGTITLE NOGFOOTNOTE 12 ! GPATH=&sasworklocation ENCODING=UTF8 options(rolap="on"); NOTE: Writing TAGSETS.SASREPORT13(EGSR) Body file: EGSR 13 14 GOPTIONS ACCESSIBLE; 15 proc iml; WARNING: The SAS/IML product with which IML (2) is associated will be expiring soon, and is currently in warning mode to indicate this upcoming expiration. Please run PROC SETINIT to obtain more information on your warning period. NOTE: IML Ready 16 load module=_all_; NOTE: Opening storage library WORK.IMLSTOR 16 ! /* load the modules */ 17 /* P1 P2 P3 p4 p5 p6 p7 p8 p9 p10 */ 18 P = {0.35 0.50 0.20 0.10 0.10 0.30 0.20 0.25 0.15 0.20, 19 0.30 0.10 0.20 0.30 0.20 0.20 0.40 0.05 0.45 0.10, 20 0.15 0.20 0.35 0.25 0.50 0.20 0.25 0.55 0.10 0.10, 21 0.20 0.20 0.25 0.35 0.20 0.30 0.15 0.15 0.30 0.60}; 22 23 24 /* expected values and variance for each ordinal variable */ 25 Expected = Mean(P) // Var(P); 26 varNames = "X1":"X10"; 27 print Expected[r={"Mean" "Var"} c=varNames]; 28 /* test the RandMVOrd function */ 29 Delta = {1 0.45 0.4 0.35 0.3 0.25 0.2 0.15 0.1 0.05, 30 0.45 1 0.45 0.4 0.35 0.3 0.25 0.2 0.15 0.1, 31 0.4 0.45 1 0.45 0.4 0.35 0.3 0.25 0.2 0.15, 32 0.35 0.4 0.45 1 0.45 0.4 0.35 0.3 0.25 0.2, 33 0.3 0.35 0.4 0.45 1 0.45 0.4 0.35 0.3 0.25, 34 0.25 0.3 0.35 0.4 0.45 1 0.45 0.4 0.35 0.3, 35 0.2 0.25 0.3 0.35 0.4 0.45 1 0.45 0.4 0.35, 36 0.15 0.2 0.25 0.3 0.35 0.4 0.45 1 0.45 0.4, 37 0.1 0.15 0.2 0.25 0.3 0.35 0.4 0.45 1 0.45, 38 0.05 0.1 0.15 0.2 0.25 0.3 0.35 0.4 0.45 1}; 39 /* loop approach */ 40 NumSamples = 10; 41 call randseed(54321); 42 do i = 1 to NumSamples; 43 X = RandMVOrdinal(1000, P, Delta); 44 /* do something with each sample */ 45 end; ERROR: Invocation of unresolved module RANDMVORDINAL. statement : ASSIGN at line 43 column 4 46 /* print results */ 47 c=varNames; 2 The SAS System 17:52 Monday, February 24, 2014 48 create MVO from X[colname=c]; ERROR: Matrix X has not been set to a value. statement : CREATE at line 48 column 1 48 ! append from X; ERROR: No data set is currently open for output. statement : APPEND at line 48 column 32 48 ! close MVO; NOTE: Cannot close WORK.MVO; it is not open. 49 quit; NOTE: Exiting IML. NOTE: Storage library WORK.IMLSTOR closed. NOTE: The SAS System stopped processing this step because of errors. NOTE: PROCEDURE IML used (Total process time): real time 0.90 seconds cpu time 0.04 seconds 50 51 GOPTIONS NOACCESSIBLE; 52 %LET _CLIENTTASKLABEL=; 53 %LET _CLIENTPROJECTPATH=; 54 %LET _CLIENTPROJECTNAME=; 55 %LET _SASPROGRAMFILE=; 56 57 ;*';*";*/;quit;run; 58 ODS _ALL_ CLOSE; 59 60 61 QUIT; RUN; 62
... View more