10  COM X[103,22],M[20,20],U[20,20]
20  COM Q[20],V[20]
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]
46  REM HEWLETT-PACKARD 36755B, 6/74
50  REM:VERSION 21MAY73
200  GOTO Q[7+Q[18]]-8 OF 1000,3000
1000  PRINT "REGRESSION ANALYSIS :"
1010  PRINT 
1020  PRINT "1.  SIMPLE OR MULTIPLE REGRESSION"
1030  PRINT "    REGR  ORDINARY REGRESSION"
1040  PRINT "    WLSR  WEIGHTED LEAST SQUARES"
1050  PRINT "2.  FOR SELECTING INDEPENDENT VARIABLES"
1060  PRINT "    BACK  BACKWARD SELECTION PROCEDURE (AUTOMATIC)"
1070  PRINT "    FORW  FORWARD SELECTION PROCEDURE (AUTOMATIC)"
1080  PRINT "    STEP  STEPWISE PROCEDURE (USER TO SPECIFY STEPS)"
1090  PRINT "    SWEE  SWEEP OPERATION.  USED TO DELETE A VARIABLE"
1100  PRINT "          FROM OR TO ADD A VARIABLE TO THE CURRENT"
1110  PRINT "          REGRESSION EQUATION"
1120  PRINT "    ALLS  TO PERFORM REGRESSIONS USING ALL POSSIBLE"
1130  PRINT "          SUBSETS OF A SET OF INDEPENDENT VARIABLES"
1140  PRINT "    SUBS  TO REGRESS THE DEPENDENT VARIABLE ON ALL"
1150  PRINT "          POSSIBLE COMBINATIONS OF A GIVEN SIZE OF"
1160  PRINT "          A SET OF INDEPENDENT VARIABLES"
1170  PRINT "3.  FOR PRINTING REGRESSION RESULTS :"
1180  PRINT "    ANOV  ANALYSIS OF VARIANCE TABLE"
1190  PRINT "    BCOR  CORRELATION MATRIX OF REGRESSION COEFFICIENTS"
1200  PRINT "    BCOV  COVARIANCE MATRIX OF REGRESSION COEFFICIENTS"
1210  PRINT "    COEF  REGRESSION COEFFICIENTS, STANDARD ERRORS, T"
1220  PRINT "    SUMM  SUMMARY STATISTICS -- MULTIPLE R, STANDARD"
1230  PRINT "          ERROR OF RESIDUALS, ETC."
1240  PRINT "4.  FOR EXAMINATION OF RESIDUALS :"
1250  PRINT "    AUTO  TO COMPUTE AUTOCORRELATION COEFFICIENTS"
1255  PRINT "          (BOX-JENKINS ESTIMATES)"
1260  PRINT "    DURB  DURBIN-WATSON STATISTIC"
1270  PRINT "    NORM  TO OBTAIN NORMAL PROBABILITY PLOT OF RESIDUALS"
1280  PRINT "    PLTC  TO PLOT CONFIDENCE BAND OF FITTED VALUES"
1290  PRINT "    PLTS  TO PLOT SEQUENCE OF RESIDUALS"
1300  PRINT "    RVSF  MINIPLOT OF RESIDUALS VERSUS FITTED VALUES"
1310  PRINT "    RUNS  RUNS TEST FOR RESIDUALS"
1320  PRINT "    SAMP  TO PERFORM REGRESSION USING RANDOM SUBSAMPLES"
1330  PRINT "          OF DATA.  FOR ERROR ANALYSIS"
1340  PRINT "    SEPR  TO COMPUTE STANDARD ERRORS OF PREDICTED VALUES"
1500  GOTO 9000
3000  PRINT "MISCELLANEOUS COMMANDS :"
3010  PRINT 
3012  PRINT "CALC   A CALCULATOR FOR ARITHMETIC OPERATIONS"
3020  PRINT "CHGP   TO CHANGE THE LEVEL OF PROMPTS"
3030  PRINT "EXPL   TO EXPLAIN INDIVIDUAL COMMAND WORDS"
3040  PRINT "HELP   TO OBTAIN HELP ON VARIOUS CATEGORIES OF COMMANDS"
3050  PRINT "LIST   TO OBTAIN THE COMPLETE LIST OF COMMAND WORDS"
3052  PRINT "NEWC    TO DEFINE A NEW COMMAND NAME"
3054  PRINT "NEWS    TO PRINT NEWS ABOUT $IDA"
3060  PRINT "PAUS   TO PAUSE AT THE COMMAND LEVEL.  OTHERWISE IDA"
3070  PRINT "       WILL ASK YOU IF YOU NEED HELP IF NO COMMAND IS"
3080  PRINT "       ISSUED WITHIN ONE MINUTE"
3090  PRINT "QUIT   TO EXIT FROM IDA TO HP SYSTEM CONTROL"
3100  PRINT "RDIM    TO RE-DIMENSION MAX SIZE OF DATA MATRIX"
9000  CHAIN "$IDA39",2000
9998  CHAIN "$IDA",150
9999  END 
