10  COM X[103,22],M[19,19],U[19,19],Q[20],V[20],P[78]
30  COM M$[60],N$[72]
40  COM N,K,N8,K8,N9,K9,Q9,Q7,Q5,Q4,Q3,Q2,Q1
45  COM I3,I4,U9,X$[20]
50  REM:12JUN74
52  REM:>EXPL FOR 56<Q2<97
200  GOTO (.4999+Q2/8) OF 210,210,210,210,210,210,210,280,290,300
205  GOTO ((.4999+Q2/8)-10) OF 310,320
210  REM:EXPLAINED IN IDAE21
280  GOTO (Q2-56) OF 5700,5800,5900,6000,6100,6200,6300,6400
290  GOTO (Q2-64) OF 6500,6600,6700,6800,6900,7000,7100,7200
300  GOTO (Q2-72) OF 7300,7400,7500,7700,7600,7800,7900,8000
310  GOTO (Q2-80) OF 8100,8200,8300,8400,8500,8600,8700,8800
320  GOTO (Q2-88) OF 8900,9000,9100,9200,9300,9400,9500,9600
5700  PRINT "QUIT : END OF SESSION"
5705  PRINT "----"
5710  GOTO 9998
5800  PRINT "RANDOM SIMULATIONS"
5805  PRINT "----"
5810  PRINT "FROM CAUCHY, CHI-SQUARE, GAMMA-1, LOGNORMAL, NORMAL AND"
5812  PRINT "UNIFORM DISTRIBUTIONS AND AUTOREGRESSIVE PROCESS."
5815  GOTO 9998
5900  PRINT "RECOUP : RECOVER ALL ROWS"
5905  PRINT "===="
5910  PRINT "DELETED BY HAVING EXECUTED"
5912  PRINT "THE COMMAND 'DELO' OR 'DELB' UNLESS USE OF"
5914  PRINT "'DIFF' OR 'LAGG' HAS MADE FIRST ROWS UNAVAILABLE FOR ANALYSIS."
5915  GOTO 9998
6000  PRINT "REGRESSION : TO SPECIFY REGRESSION EQUATION"
6005  PRINT "----"
6010  GOTO 9998
6100  PRINT "RETRIEVE A BLOCK OF ROWS"
6105  PRINT "---        -"'10;
6110  GOTO 5910
6200  PRINT "RETRIEVE AN OBSERVATION (ROW) VECTOR"
6205  PRINT "---         -"'10;
6210  GOTO 5910
6300  PRINT "RUNS TEST"
6305  PRINT "----     FOR ";
6307  PRINT "RESIDUALS OR ANY OTHER VARIABLE (COLUMN IN DATA MATRIX)"
6310  GOTO 9998
6400  PRINT "RESIDUALS VS FITTED VALUES PLOT"
6405  PRINT "-         -- -"
6410  PRINT "A VERY SMALL PLOT TO TAKE A QUICK LOOK TO SEE IF"
6415  PRINT "REGRESSION ASSUMPTIONS ARE BADLY VIOLATED. USE 'SCAT'"
6420  PRINT "FOR A DETAILED PLOT IF DESIRED."
6425  GOTO 9998
6500  PRINT "SAMPLE SUBSETS OF OBSERVATIONS FOR ERROR ANALYSIS"
6505  PRINT "----"
6510  PRINT ". REGRESSION USING RANDOM SUBSAMPLES OF DATA MATRIX"
6515  GOTO 9998
6600  PRINT "SAVE ON A FILE PART OR ALL OF ACTIVE DATA MATRIX."
6605  PRINT "---       -"
6610  PRINT "USER WILL BE PROMPTED TO GIVE THE NAME OF THE"
6615  PRINT "FILE HE HAS OPENED TO SAVE THE DATA MATRIX"
6620  GOTO 9998
6700  PRINT "SAVE RESIDUALS OF CURRENT REGRESSION IN DATA MATRIX"
6705  PRINT "---  -"
6710  GOTO 9998
6800  PRINT "SCATTER PLOT"
6805  PRINT "----        OF ";
6810  GOTO 6307
6900  PRINT "STANDARD ERROR OF PREDICTED VALUE IN CURRENT REGRESSION"
6905  PRINT "-        -        --"
6910  GOTO 9998
7000  PRINT "SERIAL CORRELATION OF VARIABLE IN DATA MATRIX"
7005  PRINT "---    -"
7010  GOTO 9998
7100  PRINT "STANDARDIZATION TRANSFORMATION OF VARIABLE (COLUMN)"
7105  PRINT "----"
7110  GOTO 9998
7200  PRINT "STEPWISE REGRESSION : USER TO SPECIFY STEPS"
7205  PRINT "----"
7210  GOTO 9998
7300  PRINT "SUBSETS OF VARIABLES OF A GIVEN SIZE IN REGRESSION"
7305  PRINT "----"
7310  PRINT "ANALYSIS.  USER WILL BE PROMPTED TO SPECIFY THE DEP."
7315  PRINT "AND INDEP. VARS. AND AN INTEGER VALUE K.  REGRESSION"
7320  PRINT "WILL BE PERFORMED ON ALL DIFFERENT COMBINATIONS OF K"
7325  PRINT "OF THE INDEPENDENT VARIABLES."
7330  GOTO 9998
7400  PRINT "SUMMARY STATISTICS OF CURRENT REGRESSION"
7405  PRINT "----"
7410  PRINT "S.E. OF RESIDUALS, MULTIPLE R, R SQUARE, ETC."
7415  GOTO 9998
7500  PRINT "SWEEP OPERATION.  USER WILL BE ASKED TO SPECIFY THE"
7505  PRINT "----"
7510  PRINT "VARIABLE TO BE SWEPT.  IF THE VARIABLE IS IN THE"
7515  PRINT "CURRENT REGRESSION EQUATION, IT WILL BE DELETED FROM"
7520  PRINT "THE REGRESSION.  OTHERWISE, IT WILL BE ADDED.  BEFORE"
7525  PRINT "EXECUTING 'SWEEP', ONE OF THESE COMMANDS :"
7530  PRINT "    REGR    STEP    FORW"
7535  PRINT "MUST FIRST BE EXECUTED TO IDENTIFY THE SET OF"
7540  PRINT "INDEPENDENT VARIABLES UNDER CONSIDERATION."
7545  GOTO 9998
7600  PRINT "WEIGHTED LEAST SQUARES REGRESSION"
7605  PRINT "-        -     -       -"
7610  GOTO 9998
7700  PRINT "TRANSFORM SEVERAL VARIABLES BY THE SAME TRANSFORMATION."
7705  PRINT "----"
7710  GOTO 9998
7800  PRINT "RE-DIMENSION THE MAX. SIZE OF DATA MATRIX"
7805  PRINT "-  ---"
7810  PRINT "TO HANDLE MORE THAN 100 ROWS IN THE DATA MATRIX."
7815  GOTO 9900
7900  PRINT "NEW COMMAND NAME. ALLOWS USER TO DEFINE UP TO FIVE"
7905  PRINT "--- -"'10"            COMMAND NAMES FOR HIS OWN USE, I.E.,"
7910  PRINT "CHAINING $IDA TO PROGRAMS IN HIS PRIVATE LIBRARY."'10'13
7915  GOTO 9900
8000  PRINT "CALCULATOR CAPABLE OF DOING ARITHMETIC OPERATIONS. IT HAS"
8005  PRINT "----"'10"       A VARIABLE LENGTH ACCUMULATOR OF UP TO 150 DIGITS."
8010  PRINT "           FURTHER INSTRUCTIONS AVAILABLE WHEN 'CALC' ISSUED."
8015  GOTO 9998
8100  PRINT '10"SORT.  SORTS THE VALUES IN ANY VARIABLE (COLUMN) INTO"
8105  PRINT "----"'10"ASCENDING ORDER AND PLACES THE RESULTANT VECTOR INTO"
8110  PRINT "    ANOTHER COLUMN SPECIFIED BY THE USER."
8115  GOTO 9998
8200  PRINT '10"PAIRED SORT.  SORTS ONE VARIABLE (COLUMN) INTO ASCENDING"
8205  PRINT "-      ---"'10"ORDER AND CARRIES ANOTHER VARIABLE (COLUMN) WITH"
8210  PRINT "          IT. THE SORTED VARIABLES ARE PLACED IN TWO OTHER"
8215  PRINT "COLUMNS SPECIFIED BY THE USER.  ONE POSSIBLE USAGE:"
8220  PRINT "PSORT FITTED VALUES FROM REGRESSION AND CARRY RESIDUALS. THEN"
8225  PRINT "ANALYSE THE VECTOR OF RESIDUALS SO SORTED."
8230  GOTO 9998
8300  PRINT '10"RANK ASSIGNS RANKS TO THE OBSERVATIONS IN A COLUMN"
8305  PRINT "----"'10"SPECIFIED BY THE USER AND PLACES THE VECTOR OF"
8310  PRINT "    RANKS INTO ANOTHER COLUMN SPECIFIED BY THE USER."
8315  GOTO 9998
8400  PRINT "ENTER SELECTED VARIABLES FROM A SERIAL DATA FILE."
8405  PRINT "---   -"'10"      (IF 'ENTE' IS USED ALL THE VARIABLES IN"
8410  PRINT "             EACH OBSERVATION ARE ENTERED.)"
8415  GOTO 8530
8500  PRINT "ENTER SELECTED DATA FROM A 'SPECIAL' RANDOM ACCESS FILE."
8505  PRINT "--                                   --"
8510  PRINT "FILE MUST HAVE N1+3 RECORDS WITH N1<=1000 OBSERVATIONS ON"
8515  PRINT "K1<=128 VARIABLES IN FIRST N1 RECORDS AND FILE INFORMATION"
8520  PRINT "AND VARIABLE NAMES IN LAST 3 RECORDS. USER SELECTS VARI-"
8525  PRINT "ABLES AND A SAMPLE OF THE OBSERVATIONS FOR DATA MATRIX."
8530  PRINT "CALL JUNE ROBERTS AT 798-8803 ABOUT BUGS OR SUGGESTIONS."
8535  GOTO 9998
8600  PRINT "MATRIX SORT.  ENTIRE DATA MATRIX IS SORTED WITH DESIGNATED"
8605  PRINT "-      ---    VARIABLE IN ASCENDING ORDER. ALL VARIABLES"
8610  PRINT "REMAIN IN SAME COLUMNS. HINT! TO KEEP TRACK OF ORIGINAL"
8612  PRINT "SEQUENCE, USE 'INDX' FIRST."
8615  GOTO 8530
8700  PRINT "$CRSPR FILE DATA MAY BE ENTERED IN IDA DATA MATRIX"
8705  PRINT " ---- "'10"FOR SUBPERIOD AND SECURITIES SPECIFIED BY USER"
8710  PRINT "      IF THERE IS NO MISSING DATA IN THAT SUBPERIOD."
8715  GOTO 8530
8800  PRINT "PROBABILITY SAMPLE SELECTION:  SIMPLE RANDOM, STRATIFIED RANDOM"
8805  PRINT "-           ---                OR SYSTEMATIC."
8810  GOTO 9900
8900  PRINT "GAUSSIAN PROBABILITIES: COMPUTES NORMAL DENSITIES AND NORMAL"
8905  PRINT "----     PROBABILITIES BETWEEN TWO VALUES SPECIFIED BY USER."
8910  GOTO 9998
9000  PRINT "HELP WILL HELP THE USER FIND THE APPROPRIATE"
9005  PRINT "----      COMMAND WORDS FOR HIS TASKS"
9010  GOTO 9998
9100  PRINT "CROSS TABULATION"
9105  PRINT "-     ---"
9110  GOTO 9900
9200  PRINT "2-WAY TABLE OF MEANS"
9205  PRINT "      ---      -"
9210  GOTO 9900
9300  PRINT "DIVIDE ONE VECTOR BY ANOTHER"
9305  PRINT "===="
9310  PRINT "COLUMN(K) = COLUMN(I) / COLUMN(J)"
9315  PRINT "I, J, AND K USER SPECIFIED."
9320  GOTO 9998
9400  PRINT "SPECTRAL ANALYSIS--ESTIMATES THE SPECTRAL DENSITY FUNCTION"
9405  PRINT "====               OF A DISCRETE TIME SERIES"
9406  PRINT "SEE:"'10'13"SPECTRAL ANALYSIS AND ITS APPLICATIONS"
9407  PRINT "  G.M. JENKINS AND D.G. WATTS"'10'13"    HOLDEN-DAY, 1969."
9410  GOTO 9998
9500  PRINT "CATHODE RAY TERMINAL USE DECLARED"
9505  PRINT "=       =   =         ="
9510  GOTO 9998
9600  PRINT "COMMANDS--GROUPED LIST OF IDA COMMANDS"
9605  PRINT "===="
9610  GOTO 9998
9900  PRINT "FURTHER DETAILED EXPLANATION AVAILABLE BY EXECUTING COMMAND"
9905  PRINT "AT FIRST PROMPT LEVEL."
9998  CHAIN "$IDA",150
9999  END 
