Google
 

Trailing-Edge - PDP-10 Archives - decuslib10-09 - 43,50466/bmd03r.sav
There are no other files named bmd03r.sav in the archive.
h'%
:(-6Mx-%;x. 4(/+P(55H1BMD03R - MULTIPLE REGRESSION WITH CASE COMBINATIONS -  'REVISED JULY  7, 1969'/41H HEALTH SCIENCES COMPUTING FACILITY, UCLA,/30H-NO. OF SUBSAMPLES ...........,I2,/30H NO. OF ORIGINAL VARIABLES ...,I2,/27H TOT. COMB. SAMP. SIZE ....,I5,/30H ALTERNATE TAPE NO. ..........,I2,/30H NO. OF VAR. FORMAT CARDS ....,I2)     "qB
.6-N.6.7  $ D.7 $ D.8 $ D.8 .8X@Y .8X@Z .7 D3D2F7+b "Kb  "]b +_ -N D"$.-N"&.-N$5$^"$O..65d^"$..6$.65$^ /.8 /.8$4D^-\444.7-\/ "tB
.+.3.5.3 : Z J1:9s 3D2F7+| "Ob  "]b +: .+ D"$..3$.35$x  D-N@@.,@@.*@@.4@@.5@@.4 "0b.6-N.6  "b : Z -O3:.79 +(' THE VARIABLE FORMAT IS  ',18A4/(1H ,24X,18A4))  "b.+.,  ">b : Z J3:.39  "b  .34d2"$..35dx "jb  "nb  : Z "xB
h,Qh,jh-h- 3D2F+( $	 /,j$,j5d+ "Sb  "]b "`-N "{b ,Q,j--  3:.39 -N4$_-\1  -N4dx".4.-O4d7`.4 @.*@.* @-O .5.D-N -N D-O+;"$s D.5+; "ub  "wb : Z %3:-N9>  "b  "yb  "wb : Z >3:-N9F  "b  "b  : Z "b  "wb : Z $$.d3:-N9P  3:-N9L : Z h%.* Dhp h%h%.*h>"Dh-5".* h-5 F-\8M4 @hW3:-N9V : Z : Z h% %.* &$ . d"D & 
 &$ .D & h-5 -5 D-\8M4 ($ 
.
 (& F(d3:-N9a 3:-N9` "b  "Gb  : Z "b  "wb : Z $$.&3:-N9z  3:-N9v -N D.,"$.., D : Z Zh,83:.,9 .*4d
 : Z hJ D @@,83:.*9+@@J -O/.,4$4D "Xb  "]b +; -O Z h,8 Dh,83:9 ., -O F,8 .*4d@@., : Z h,84d:., .,   ,8 F,8 3:-N9 : Z h,8 D : Z h,8 D $$. ($.  d F
 $$. ($.  & F*3:.,9 3:.,9 "b.+.,  "|b  : Z "b  "b : Z $$.
3:.,93  3:.,9/"$.., D.0 : Z : Z $$ . 
 HD3:.,9< 3:.,9;-\0;4X4.,44,Q4,j : Z &$.,.., D &$.D D 4dR-\8M4 &$.,. D"Dh-3:.09E"$..04dT+V "b +;!$ Dl+m : Z : Z $$ . 
 HX3:.09X 3:.09V-\0;4l4.044,Q4,j "b  "Ab  : Z "b  "b : Z $$.X3:.09h  3:.09d : Z : Z &$ .  
 X * D 
3:.09o 3:.09n : Z@@ : Z &$. 
 &$.,.*D3:.09x   F
 3:.09v@@.. : Z &$.,. *h
D..3:.09".. &$.,..,* D.. .. &$.,..,* D.- .-5$ "b +;-\8M4.- @.-`., @ .*2D+@@.. .* .. F./-\8M4./ @./@@ : Z ./ &$.
 D-\8M4 @h% h,8 D h
 pD h%4D$ h
h% Dh>+% @@> 3:.09 ., ,8 D" p D@F`.0 @ .* D".* D@ @.1@ @.2 .. D.0 .. D.2 .24D7 .0.2 D.1+7@@.1@.* @-O-\3 4d;-\3a4 "tB
.+.,-O.* : Z J1:9?  .+/5DG3D2F+G .55$+;@@.53D2F7+R3D2F7+Y3D2F7+b3D2F+V+_ ""b  "-b "$s D.5+; "3b
 +S  D.3 ., D -O D.5 .* D.3-\444.7+|"$..74Db .7X@a-\:
 .+ D.6 ., D-N .*&$ D $t$ . ($-O. F.6 $$ .*/$& J&(. F-\5e4

 X D.7+U+t(A6,2I2,I5,I2,53X,I2)    +u(A6,33I2) +w(5H0SUMS) +y(1H F19.5,5F20.5)   +|(15H0SUM OF SQUARES)+(25H0CORRELATION COEFFICIENTS)+(6H0ROW  I2)   +(1H ,12G10.4)  +('-THE COEFICIENT OF DETERMINATION IS NEGATIVE, BMD03R WILL SKIP TO THE NEXT REPDEL CARD,IF ANY.')  +(14H0SELECTION NO.I5,1H-I2)   +(14H1SELECTION NO.I5,1H-I2//) +(1H0)+('-A PARTIAL CORR. COEF. IS UNDEFINED, BMD03R WILL SKIP TO THE NEXT REPDEL CARD, IF ANY.')+"(19H0CROSS PRODUCT SUMS) +-(91H0ERRONEOUS REPDEL CARD ORDER. SELECTION NUMBER DOES NOT AGREE WITH PREVIOUS SELECTION CARD.)    +3(46H PROGRAM SKIPS TO NEXT SELECTION CARD, IF ANY.)    +>(73H0CONTROL CARD ORDER ERROR. PROGRAM EXPECTS A SELECT OR REPDEL CARD BUT A ,A6,18H CARD WAS PRESENT.)  +A(21H SUB-SAMPLES SELECTED28I3)+G(42H0INVERSE OF CORRELATION COEFFICIENT MATRIX)   +K(29H0CROSS PRODUCTS OF DEVIATIONS) +O(' A PROBLEM CARD WAS EXPECTED.')  +S(' A SELECTION CARD WAS EXPECTED.')+X(' A TRANS-GENERATION CARD WAS EXPECTED.')   +](' A REPLACEMENT-DELETION CARD WAS EXPECTED.')    +d(' THE CARD THAT WAS READ-IN CONTAINS AT LEAST ONE ERROR.') +e(20A4)    +j(' THE LAST CARD READ-IN WAS     ',20A4)+n(1H06X,23HTRANS GENERATOR CARD(S)) +x(46H0CARD    NEW     TRANS    ORIG.   ORIG. VAR(B)/45H  NO. VARIABLE   CODE    VAR(A)   OR CONSTANT)+{(A6,I3,I2,I3,F6.0)  +~(2H  I2,I8,2I9,F14.4)    +(22H0SAMPLE SIZE RETAINED=I7) +	(67H0INSUFFICIENT SAMPLE,PROGRAM WILL GO TO NEXT SELECTION,ETC., IF ANY)   -\:
+  +0 0>y4BMD03R    `SELECT    FINISH    pPROBLM    pSELECT    pTRNGEN    pREPDEL    sx.8 ".qB
 : Z/ ^3:.69.; /3D2F7+.D ".ub  "/b -\:
 $3$.7gO .71fgOA4$.K "/
b  $ D.7 $	$D.7@@/ : Z/ h^.D/3:.69.N//"/..64D.W5d.U// / D.6 ".yb
/  ".sB : Z/ -O3:.79.X  : Z/  h-O Dhp3:.79.\ : Z/! .7X@.a "pQ"ZB : Z/ -53:-N9.b  .8X@.f` : Z/ -53:-N9.g  /!3:.69._+.m(20A4)     .8X@.n .8X@.p+/+.s(A6,11I6/(6X,11I6)) +.u(18A4)    +.y(' A SAMPLE SIZE CARD WAS EXPECTED.')   +/(81H0TOTAL SAMPLE SIZE AND SUM OF SAMPLE SIZES DO NOT AGREE. THE PROGRAM ASSUMES THE A6,28H TO BE CORRECT AND PROCEEDS.)+/
(' THE CARD THAT WAS READ-IN CONTAINS AT LEAST ONE ERROR.') +/(1H023X71HNUMBER OF VARIABLE FORMAT CARDS INCORRECTLY SPECIFIED, ASSUMED TO BE 1.)   +/4 Z/ \/+.9 / /-|pP/TOTAL      SUM      SAMSIZ    k`/!!$ D0F : Z0H .0F Z .0G Z &$. 0E. 'k D0I  Z0I 0H Z0J &$.0I 0E. $'kXD/0-\:4/0 @0G-\:40I0G5 /: &$0J.0I 0E. 'k D0I 0H.0F 0I F 0H.0G 0J F 0J3:0E9/+ 0I3:0E9/* 0H.0F  D0J"0H 0H.0F.4d/P : Z0I &$.0H 0E."'k D0J $$ 0H. 0E..0J 
0E.
 
7k J'k $$.0J 0E. 0J Hk3:0E9/C 0H.0G  D0I"0H 0H.0G.4d/d : Z0J &$0H. 0E."'k D0J $$0H. 0E. *$
0I.
 
0E.
 7k Hk $$0I. 0E. 0J Hk3:0E9/V : Z0I"0H.0I4D/m &$0H 0I. 
0E.
 /k 
0H.
 0E.?k"D/k 0I3:0E9/d : Z0I : Z0J"0H.0I4D/|"0H.0J4D/| &$0H.0I 0E. 'k ($0J 
0H.
 
0E.
7k 
0I.
 0E.D?k 0J3:0E9/p 0I3:0E9/o : Z0J"0H.0J4D0	 &$0J 0H. 
0E.
 /k ,$
0H.
0H 0E.?k D/k 0J3:0E90 &$0H.0H 0E. 'kD0F!$ &$0H 0H. 
0E.
D/k 0H3:0E9/# 0E D0H>0H 0H4d0; 0H.0F  D0I"0H.0I4d0( : Z0J &$0H. 0E. 'k D0J $$0H. 0E. *$
0I.
 
0E.
"7k Hk $$0I. 0E. 0J Hk3:0E90 0H.0G  D0J"0H.0J4d0 : Z0I &$.0H 0E. 'k D0J $$ 0H. 0E..0J 
0E.
"
7kJ'k$$.0J-0E.10JHk3:0E90-+0+0@41Z0C.\0D1'0D,p,!p,!p,ap,8p+/!0C.0D\0G/,Ap-|ptp0J--N..5-D.1"$..1"&..1$5$11:Z1&@@h%@@h>0:1Z1&1$$.1&@@d1:90R 1&1:90P : Z1&"h^ Dh,83:.690X : Z1& hJ D1' 1'4d0^"$ 1'$D,8 1&3:.390Z@@1'@@-O : Z1( h,8 D1( 1(4D15d0o"$$D1( : Z1) .8X@0g@ : Z1& -53:-N90h 1) 3:1(90f+0n(20A4)    +1 : Z1) .8X@0q@ : Z1& -53:-N90r 1)  .34d0-\5@4-54-N4.341(4.44.44,Q4,j4-4-4.541) .45$0@@.4+1 : Z1& h-5Dh% h-5h-5Dh>3:.191 : Z1& : Z1& h-5 1&-5 &$ 1&.D d3:.191 1&3:.191 .8X@1
b.+.,-O  "2b.,.*  "3b-O  "2b.-  "2 b.-  "2%b..  "2+b..  "21b./  "25b./  "29b
  "2=b  "2Ob.0...0.1  "2Ub.1...2  "2[b.2 $$.,..,*  : Z3 $$ * F
3:.,91L : Z3 Z3 3 Z3 &$ 3.  
 *$
3.
3(
 D D3:.,91Q $.3 D3 3 Z3@@3 : Z3 &$3. D &$3.
D33:391["3 &$3 3. * D 
 33:.,91Y 33:.091O : Z3 &$., .  D 
 Dhl3:.091h : Z3 hl &$.,..,* Dh3:.091n "2^b  "2jb  : Z3 h,8 D3 "2vbh,8 3pWh
h%h>h-hlh 3:.091v ., ,8 D3 "2{b .,,8 3pW  "2}b $$.,..0D  "3b : Z3 J3:.*92	 +2(14H1SELECTION NO.I5,1H-I2//12H SAMPLE SIZEI8)    +2(17H NO. OF VARIABLESI3,30H      NO. OF VARIABLES DELETEDI3,36H  (FOR VARIABLES DELETED, SEE BELOW))+2 (29H0COEFFICIENT OF DETERMINATIONF8.4)  +2%(29H MULTIPLE CORR. COEFFICIENT  F8.4)  +2+(44H0SUM OF SQUARES ATTRIBUTABLE TO REGRESSION  F15.5) +21(44H SUM OF SQUARES OF DEVIATION FROM REGRESSIONF15.5) +25(23H0VARIANCE OF ESTIMATE  F12.5)  +29(23H STD. ERROR OF ESTIMATEF12.5)  +2=(20H0INTERCEPT (A VALUE)F12.5//)   +2O(1H0,16X,37HANALYSIS OF VARIANCE FOR THE MULTIPLE/25X,18HLINEAR  REGRESSION/7X,19HSOURCE OF VARIATION,7X,4HD.F.,6X,6HSUM OF,8X,4HMEAN,9X,1HF/42X,7HSQUARES,7X,7HSQUARES,5X,5HVALUE) +2U(30H DUE TO REGRESSION............I5,F15.5,F14.5,F11.4)+2[(30H DEVIATION ABOUT REGRESSION...I5,F15.5,F14.5) +2^(22X,8HTOTAL...I5,F15.5//)    +2j(105H0VARIABLE     MEAN        STD.        REG.    STD.ERROR    COMPUTED    PARTIAL     SUM OF SQ.  PROP. VAR.)    +2v(101H   NO.                  DEVIATION    COEFF.   OF REG.COE.  T VALUE    CORR. COE.     ADDED       CUM.)   +2{(I5,F15.5,F12.5,2F11.5,2F12.5,F15.5,F11.5)   +2}(I5,F15.5,F12.5)    +3(32H0COMP. CHECK ON FINAL COEFF.    F11.5//) +3(30H DEPENDENT VARIABLE IS NOW NO.I3)   +3
(21HVARIABLESDELETED...28I3)+3uX3!$	 $	  D3h"3h D3i"$.3g4d3 "3Db  "3Hb  : Z3i@ : Z3j -53:-N93 3i +3$(20A4)    -\9}4 @3j : Z3j h,8 D3k 3k -5h
D3j3:.093& ., ,8 D3k"3j 3k-5 D3k"3h3k5$30 3k D3h"3i3k4d33 3k D3i $2$3g+38 "3Ob3i 3k-53j3k  3i3:-O93 "3Rb  "3]b "3h3i D3l 3l./ D3l "3Sb3l  "3Xb3l +3H(1H1,19X,18HTABLE OF RESIDUALS)    +3O(59H0OBSERVATION     Y VALUE         Y ESTIMATE        RESIDUAL) +3R(I7,2F18.5,F16.5)   +3S(1H0)+3X(35H0RANGE OF RESIDUALS................F16.3)+3](35H RANGE / STD. ERROR OF ESTIMATE....F16.3)+3a(26H0TEST OF EXTREME RESIDUALS)    +3d4 Z3f \3f  3g,!p+3 3f 3f-|p|h3l 44$3z5d3o $ D4 4/44D3t $3D4+3u 4X@3s"$.44D3x"$.44D3z 4X@3x 4 D4+4 "3|b -\:
+3(25H ERROR ON TAPE ASSIGNMENT)+44 Z4 \4  4,!p,!p+3m 4 4\ 4,Ap,Ap-|pg04	+444
45NQ*5S4Z5T5\5T 5T,!p@5U$"D5]-\8M45] 5U F5]-\8245]!85NX8*8 5T+5T-|p`5X @5^-:4Z5` 5`.5Z4D5` 5`.5Z +D5a 5`.5[-4D5a 5`.5[ +D5b"$.5a4d4#@5b @5b+5a.5W44D5c6b5a0b7+4&44/44644@44D44G44R44m44q44t44w44{44454545
45c 5`.5W @+5!$5_ 5c F5c!$5_!&5c F5d 5c4$55d4_ 5d4$54D41-\8M45d @5^-\4
45^ 5`.5W @+5 5d4$55d4e-\8M45c @5^-\4
45^ 5`.5W @+5-\8M45c @5c-\8M45d @5d-\4
45d @5^-\4
45c5^ 5`.5W @+5 5c4D5!$5c 5`.5W D+5 5b5c 5`.5W D+5 5b5c 5`.5W D+5 5c4D41 5c 5b,8l 5`.5W D+5 5c 5b.5W 5`.5W D+5 5c 5b.5W 5`.5W D+5 5c 5b.5W 5`.5W D+5 5b.5W 4D5 5c 5b.5W 5`.5W D+5`5b @5b"5b5c5$47+41 5c 5b.5W5$47+41 5c4d5-\9_45c 5`.5W @ 5`3:5X94+5@"$s D5Y"5`.5\4D5 5` D5\ "5(b5`  "5=b5\  "5"b :5Y+5((45H0THIS CASE WILL BE DELETED FOR ALL VARIABLES )+5=(30H0THE INSTRUCTIONS INDICATED ON/25H TRANS GENERATOR CARD NO.I2,4H RE-/29H SULTED IN THE VIOLATION OF A/31H RESTRICTION FOR THIS TRANSFOR-/31H MATION. THE VIOLATION OCCURRED/27H FOR THE CASE LISTED BELOW./)  +5@( 9H CASE NO.I5)    +5I4 Z5U \5V  5V, p,!p,!p,!p,!p,!p, p, p, p, p,!p,!p+4	 5U 5V\ 5\/ ,Ap/ ,Ap,Ap-|p 0 9~j 5d4O@6L+5g4@@6LO"$ D6L $:INX|H5j+5 
66@6L J6 
6J6Z6+5 J6z6+6H
z@+5 #p &> 
3L6+5{7@6 /&5f5t7 +5@@ 6: 6 L 6 
PL6+5~Rd.R6d$2N+5v:6:kN
y1kN
y CB`x6x6H6HZ60B+5	d
:`6L+5+5ox6L4}X6M \72 @73<7:0<0|+1\+6[,>p6LZp6L+p@h6~@p6~@(7@07"@x7@7@87$@(7@P7@P7@h6~@6c@ 6c@6~@6~r7[(/<0"`S<pX<0 p3@7;+6b*|6^-<7Hwx6`Z`6M+7!  @w+6_<7< p7 p+6~,>,>,> &w p,6y,&.<7@p+6w p,6y"7< 7*.< p`7= w,&,&5 6i.< pd7=:." Q,& p,&>`96t.<96i@@,^,^,^+6~d @@& 0b.".")B}5@6z,~m<!<P\7.<7< p[pl<0@X+7Zp.</ pQ \7/+7@@7/!<P\7.7@71+7
 <72 \70@@71!<P\7.XX\7. 7>7@70D<7@71A< \7/ <7.[`x 73,x,^x 72+6M 6MQ< \7.:6M  \7/<7> p7*|7? < \7/@@70+7@@7/ Q< \7.<7> p7*|7?+777A 7B \7/ @7!XQ< \7. 7C \7/+7~x7![`x 73,x+7)Z \7.@@7/@@7/<7< \70+7771 70X\6M@@71@@70+7P7+~073>x! Z @
&7CU`eB+79@)@G 
"+76
&7G+7l6$1,>:.@
p.46$tx7(.
.47/.7.SEQIN}07@@7@SEQOUT@7A@7!
%5 Source level error at user's loc	
	`Z(X^. >S.~(3~+7L	~+7XZ. \x <x*<x .->:ez+7S!"	b+  "7U	b+Z. h+ggM?} 7W
&7Z	b+7H,
?NO CORE AVAILABLE - CAN NOT PROCEED
x 7^a.3@1,>:O@8+7cgR~@1,>:@@8,>,>@6 w+7o"80B+7k!"A`X#p5@7h/#p!"X#p+7o\p+7oa.9'1,>:,>,>O@8+7o,>
6+ _4`7x"`Q@,> <8,,^,> <8!,
,^*b7u+8,> <8",,^7@8+7},> <8%,
,^+7,> <8',
,^Z5"8,> <8(,
,^,7@8,
,> <8*,,^,,> <8-,,^,> <80,
,^(@qd1@,,
1@#+80@*+8,>8<81,,^+8,^,^,^,~('eTypeGtohContinue,Xto Exit,TTotrace.'/2H*,$)(A1)(1H@14A5/)(1HA5,1X,O6)PAUSESTOPh8.pX`88pp8!X`8#8p08p8&pj8p8'pp8)X`8+8X~P8.8px|p81CR 8@,~B@ B8""X+8U4B8^+P7Y0
8`#p+8O  ,~u 8_attempt to take SQRT of negative argKc3@ p p+8oKc3K  ,8o 
,~Kc3J  ,8o ,~Kc3I  ,8o ,~Kc3H4B95@8s5"9+D7Y0
8rU ,~,>,># $)D/$@,>4d8|X $(F) + 8|5F8|5"8{"` ,9+9#  ,> <9,9_,^@,> <9,9:,^5&9",^,^,^,~! ,~xxKc#@ p p+9Kc#K  ,9 @,~Kc#J  ,9 @,~Kc#I  ,9 @,~Kc#H4B975@95"9!+D7Y0
9U ,~ D97!$ @96 B965"9#`+ 93,9!"B,~+ 9"(BdB+ 9"5B9  97,~ +7`96+9*`d +D7Y09&+D7Y0
9&U `d @6 96+9! 96`B"`+9!/98id +9-+D7Y09&#96,> <99,9_,^ @`96@,> <99,9:,^+9'U",996+ 9"+9|97! ,~xKc1,>: p3"9V+9@3b9U+9B+D7Y0
9?U ,~+D7Y09A  ,~ D9V F9W@@9W%"j"%9T)/;`:XD9P5f9IaF+9I.&@(|h&f9W 9S9T 9S 9W9RD9U@ 9V 9W,~!t0_'"S'qf!um.	.#Y% !vyO^	RX9WC2|t(1,>: p4@9o @9^,> <9x,9_,^9^,~{e^b}9^C2|p1,>: p5`9c4@9o+P7Y09x#p3@9r+9q)r. !@9v! n@9v(|h"9s 9s B9w 9t9t9u9w9v9u,~+D7Y0
9p 9v,~  ,~ 0_i/X3 6P'M 5( bB W
R `@89wx9^ATTEMPT TO TAKE LOG OF NEGATIVE ARG|89|g:=@1,>:p+9g:9d5`:4B:/"ab+:2@:;@4 :l ,~?C1,>:#p,~S01,>:#p+":,~U ,~KbN@1,>:,
,~:Y\:Q<X\:*+!$hX$h@@h*% ": BhL " BhM+xeX2GiSHYC aSiSH~:INXGYC GSHiSHaSaSI'IR
IR
 IR
0IR
@IR
PIR
`IR
p[R
[R
[R
 M?L@INXINXINXINXINXI2I2 I20I2@Gx:'iSH+