Trailing-Edge
-
PDP-10 Archives
-
decuslib10-09
-
43,50466/bmd05r.sav
There are no other files named bmd05r.sav in the archive.
h ',03 Bc- >?x -,(Cx . ?( /+ <(45H1BMD05R - POLYNOMIAL REGRESSION - VERSION OF ,18HJUNE 10, 1966 ,/41H HEALTH SCIENCES COMPUTING FACILITY, UCLA//) $ D ;-\ =V4
4 " 2B
< = = > > ? ? @ @ @@ A 83D <2F <7 + O 93D <2F <7 + K " yb $ / ;5$ 2 ;X@ N + 2-\ <54 @4 ; ?5d R $ D ?!$ " ?, A' D A " 0b " ;b = " >b = " vb @ "$ . >$ >5$ ,"$ z. =5$ . =/ >4d 0@@ B $ . > D B@@ C@B C` = @ D D D C@F C : Z D $ H$ B. ( @@"@B# ( @@ 2@B 31: z9 g : Z D ( @@ @B
: Z E $ $ . D( @@ @B 3: B9 q D3: B9 n $ 3$ @g O @1f g O A 4$ ~ $ D @ " b $ $D @ " lB : Z D L3: @9 " b : Z D L3: @9 + (' THE VARIABLE FORMAT IS ',18A4,/(1H0,24X,18A4))" ?5$ & " 5b " |B
< E : Z D + /3: E9 :3D <2F <7 + " b "$ z D B+ & : Z D "
b h +h / "$ .h +$h +4$ $ "
b D + D3: E9 ;X@ ( " LQ" ZB : Z D (
2 $ H$ B. (
"3: =9 ) "$ . ;4D 2 ;X@ 1 ?4d 7-\ =94 =4 B4 E4
34 +4 / B4$ >@@ F@@ F@@ G@@ G@@ H : Z D ( H$ B. ( "-\ B44 @hR ( 2-\ B44 @hX hXD G hRD F hR hXD G hX hXD H hR hRD F3: =9 ; F F D F G G D H D 6-\ @d4 6 F G D G "F H H H D I"$ . >4d b : Z E"$ . D I : Z D ( H$ I. ( " ( D 2 ( H$ E. ( "3: =9 Y E3: >9 V : Z E : Z D E( * H$
E.
(
(" 3: =9 d E( d C E3: B9 b : Z E : Z D ( H$ E
.
J 6(
("
E(
$0 ("3: =9 o E3: B9 n : Z E Z J : Z D ( H$ E. ( " ( H$ J. ( D " ( $ J
E.
J 6(
( ( 3: =9 z $ $ E. J( & $ J. E( J3: B9 y E3: B9 x ( $ B( d D
B( $ $ J" 6 D & D F * H J
F . (
G . L h ( 6-\ B 4
6 7-\ B44 7 @ S " @b " Ab " Fb
" Jb B(
" Nb
J " Rb
" Vb S " Zb H I & ( $ B. B( D K!$ I & ( $ B. B( D L $ D M-\ ;4
K4
L4 M4 =4 A L N"$ . >5d A -\ B44 @ &-\ B44
J @ O $ D O+ ' : Z P Z M : Z E ( & $ B. ( : Z D $ $ E . F 6( 3: P9 I E3: P9 C-\ "b4
!4 P4
4 P4 Q" A Q5$ Y " nb N L A5d ! $ D A+ ! : Z D $ $ . F 6( ( ( ( 3: P9 Z@@ K@B L : Z D ( ( $ B. ( D K K3: P9 c K ( $ B. B( $ $ L $ . P` @ Q D Q-\ B44
L @ R : Z E R & ( $ . ( D -\ B44 @ F-\ @d4 F @hS3: P9 r@@ R@B S : Z D ( D R R3: P9 | L N R B( $ $ J " _b M " Nb
J " cb " jb : Z D (
3: M9
: Z D ( -\ B44 @h &3: M9 -\ B44
J @ O M D O " gb " jb : Z D S3: M9 " @b -\ ;4
K4
L4 M4 =4 A P3: >9 B $ 4 D M " @b -\ ;4
K4
L4 M4 =4 A"$ . >5D >-\ 94 X4 R4 O4 &4 =4 O+ > " b~ + 2 " (b~ + 2 " .b~ -\ BG+ 5(A6,A2,I3,4I2,49X,2I2) + ;(21H0TRANSGENERATION CARD//16H CODE CONSTANT//) + >(15H0PROBLEM NO. A2) + @(12H SAMPLE SIZEI5) + A(1H0)+ F(38H0REGRESSION - ONE INDEPENDENT VARIABLE) + J(23H0XMEAN..... F12.5) + N(23H YMEAN..... F12.5) + R(23H0INTERCEPT (A VALUE)...F12.5) + V(23H REG. COEFFICIENT......F12.5) + Z(25H STD. ERROR OF REG. COEF.F10.5)+ _(23H0CORRELATION COEF......F12.5///) + c(32H0POLYNOMIAL REGRESSION OF DEGREEI3) + g(24H0REGRESSION COEFFICIENTS) + j(25H0STD. ERROR OF REG. COEF.)+ l(10(1X,F12.5)) + n(20A4) + v(71H0COMPUTATIONAL ACCURACY NOT SUFFICIENT FOR POLYNOMIALS OF HIGHER DEGREE) + y(' NO. VF CDS.',I5) + |(22H0ERROR ON PROBLEM CARD) + (A6,I1,8(I2,F6.0)) +
(96H0SPECTG CARD MISPUNCHED OR OUT OF ORDER. PROGRAM WILL PROCEED TO NEXT JOB, IF ANY, OR TERMINATE.) +
(1H I3,F12.5) + (29H0ILLEGAL TRANSGENERATION CODEI3,67H SPECIFIED. PROGRAM WILL CONTINUE LEAVING OUT THIS TRANSGENERATION.) + (1H023X71HNUMBER OF VARIABLE FORMAT CARDS INCORRECTLY SPECIFIED, ASSUMED TO BE 1.) + ((' DEGREE OF POLYNOMIAL INCORRECTLY SPECIFIED. IT CANNOT EXCEED 10') + .(' NUMBER OF CASES TOO LARGE. IT CANNOT EXCEED 500.') + 2(' DEGREE OF POLYNOMIAL IS TOO HIGH.') -\ BG+ + 0BMD05R x5 P P8PROBLM FINISH SPECTG }p .3D -+ $ : Z / -2Dh /+ h / D -+ %1: 9 -3D 8+ % / D -+ % - D -+ )4 Z + \ , ,,!p ,!p + + ,\ -,Ap -|p x . mh /B B 4 5 6 7 8 9 A B C D E F G H I / : Z G@@ G!$ D H : Z H G. B D H H . D D G3: E9 < G C G D N G3: D9 9 " b " b : Z G . C h N D I " !b . B . Ch N I 3: D9 I!$ $ D I!$ $ "D J I D J J D K : Z G . B $ XD ^-\ @64 J4 ^ @ J . B $ XD b-\ @$4 K4 b @ K . C $ XD g $h NXD h-\ @64 I4 g4 h @ I . C $ XD m $h NXD m-\ @$4 J4 m4 m @ J3: D9 [ " 0b " *b -\ <4 I4 J4 @4 K4 L4 L4 M F D !| F D !} B D M C D " N D " $ D N-\ $P4 M4 J4 K4 "4 !|4 I4 J4 N4 @ : Z G . B D M . C D " h N D "-\ $P4 M4 J4 K4 "4 !|4 I4 J4 N4 @3: D9 @@ N-\ $P4 M4 J4 K4 "4 !|4 I4 J4 N4 @ " $b L L + (1H15X,18HTABLE OF RESIDUALS) + !(/6H0 NO. 4X,7HX VALUE4X,7HY VALUE4X,11HY PREDICTED4X,8HRESIDUAL//) + $(I5,F13.4,F11.4,2F13.4) + *(26H GRAPH SCALE EXTENDS FROM F10.4,4H TO F10.4) + 0(1H1,46X,38HPLOT OF OBSERVED AND PREDICTED VALUES./) + 8(12H0GRAPH CODES//13H O=OBSERVED Y/14H P=PREDICTED Y/21H B=OBSERVED=PREDICTED//)+ >4 Z A \ A B, p , p ,!p , p ,!p ,!p + 8 A A-|p !y p EO P t" !$ D "o : Z "p@@h"~ ( $ . (
"m.
/t-\ B44 "@h#3: "m9 " "p h"~5D "( "p # & , $
"p.
"p(
"m. ?th L "o
"q . ( 4h "( "p D "r "p # & , $
"p.
"p(
"m. ?th -\ B44 @ "q "p3: "m9 "-\ @64 "o4 "q @ "o "r & F"~ "r Z "p ( & $ "r. (
"m.
7t"t $ $ "r. ( "m. @@ t@B t3: "m9 ". "r( "t "r-\ B44
"r @ "n : Z "p ( & $ . "r(
"m.
7t"t $ $ . "r( "m. @@ t@B t3: "r9 "= "r(
"n.
/ "s "r( "n. @@ @B "r( "j"t : Z "p : Z "t "p( "t ( D "td "r ( $
"p.
J "o(
"m.
$7t$7t3: "p9 "Q "s "p( D "td "r
"n.
$/$/, "p3: "m9 "O5 "q3: "m9 "+ "g4 3Z "k1\ "l,F "l,)p ,!p ,1p ,!p ,!p + " "k, "l\) "o,Ap ,Ap -|p .0 e)#+ # $g4D #q@@ $h-\ <4 $c4 $c4 $\4 $h4 $i4 $i4 $j" $i $i D $j $h D $k"$ . $k$ $k4$ #4 $h4d #% " #b $h4d #b $i D $u : Z $k $jh$t Dh$u1: 9 #' " # b : Z $k $u.: 1z + #+ : Z $k $u $k.: 1z + #. $h4d #"+ $O"$ . $k4$ #74D #8"$ .D $k $ / $k D $l $h ${ D % $h5d #O $h ${ D %` $h @ $l $j $l $] D $l $i $l D $u : Z $k $jh$t Dh$u1: 9 #B " % Q" b : Z $k $u.: 1z + #F : Z $k $u $k.: 1z + #J $h5d $O"$ . $h4D # " #b : Z $k $f3: $k9 #R : Z $m $f : Z $k $f $k1: 9 #V $m1: 9 #T $f : Z $k $f $k3: $l9 #[ $h4d #b+ #; " #b $h5d #;@@ $g@@ $m $d4$ $ : Z $k : Z $k $ $ . $k $g F$l1: 29 #f $k1: 9 #d-\ <4 $a4 $a4 $]4 $n4 $n4 $o4 $o" $n $o D $p+ #q $d4$ $M4D $* $d4$ $ : Z $p . $b D $q $o $` D $q $q5$ #y@@ $q $i $p. $b D $r $r5$ #}@@ $r!$
$ D $r: !Z $p . $b$ D $q1 $i9 . $b D $r: $r5$ $@@ $r!$H $r $j$K@ "@ $m,& $ $m. $r5$$lXD $ -\ %4 $q4 $ $p3: $d9 $-\ BC4 $m4 $^5@ $!+ $f>D $s+ $"- $f4D $s4" #^@ $k"$ . $k5D $E, $f,D $s," #,!p ,!p ,!p ,!p + # $ $\ $d/D ,Ap ,Ap / ,Ap ,Ap -|p !y ! !Y t `$e. <+ < < ~P${1X,X2X,3X, 4X, 5X,56X,k7X,8X, 9X,310X (17Xk> <5(F12.3, 8X)/7X,< - <4(F12.3, 8X), F12.3) < ^(9"$ 2. ;&5$ 96"$ . ;&,D ;(" ;&. ;(D ;(` ;& @ ;)` ;(Q@ ;)* ;% ;) D ;* ;% ;) D ;* ;* ;*"D ;+- ;% ;% D ;+"$ . ;&5d 9&4" : b 8 + 9( " :b ;&: " :b " :"b ." :,b ;& ;% ;* ;+ ." :2b ;( ;% ;* " :9b ;( ;+ : ;' ;' ;% F;,+ ; $ D ;& " :?b ;' " ;b " ;b : Z ;,6b 0b 7 +9?4 9D4 9H4 9N4 9U4 9[4 9b4 9h4 9o4 9u4 9| " :Gb ;& ;, ;, + :" ;, ;- D ;% ;%5$ 9K@@ ;% " :Nb ;& ;% ;% + :" ;- ;- D ;% ;%5$ 9Q@@ ;% " :Tb ;& ;% ;% + :" ;- ;. D ;% ;%5$ 9X@@ ;% " :[b ;& ;% ;% + :" ;. ;. D ;% ;%5$ 9^@@ ;% " :ab ;& ;% ;% + :" ;. ;/ D ;% ;%5$ 9e@@ ;% " :hb ;& ;% ;% + :" ;/ ;/ D ;% ;%5$ 9k@@ ;% " :nb ;& ;% ;% + :" ;/ ;0 D ;% ;%5$ 9r@@ ;% " :ub ;& ;% ;% + :" ;0 ;0 D ;% ;%5$ 9x@@ ;% " :{b ;& ;% ;% + :" ;0 ;1 D ;% ;%5$ 9@@ ;% " ;b ;& ;% ;% ;,3: ;'9 9= " :2b ;( ;% ;* " :9b ;( ;+ + :(65H0 ANALYSIS OF VARIANCE FOR SIMPLE LINEAR REGRESSION)+ :(41H0 ANALYSIS OF VARIANCE FOR I4, 19H DEGREE POLYNOMIAL) + :"(85H0 SOURCE OF VARIATION DEGREE OF SUM OF MEAN F)+ :,(87H FREEDOM SQUARES SQUARE VALUE) + :2(37H0DUE TO REGRESSION............. I6,F19.5,2F14.5) + :9(37H DEVIATION ABOUT REGRESSION.... I6,F19.5,F14.5) + :?(37H TOTAL.... I6,F19.5///) + :G(45H0 FINAL ANALYSIS OF VARIANCE FOR I4, 19H DEGREE POLYNOMIAL) + :N(37H0LINEAR TERM................... I6,F19.5,F14.5) + :T(37H QUADRATIC TERM................ I6,F19.5,F14.5) + :[(37H CUBIC TERM.................... I6,F19.5,F14.5) + :a(37H QUARTIC TERM.................. I6,F19.5,F14.5) + :h(37H QUINTIC TERM.................. I6,F19.5,F14.5) + :n(37H SEXTIC TERM................... I6,F19.5,F14.5) + :u(37H 7TH DEGREE TERM............... I6,F19.5,F14.5) + :{(37H 8TH DEGREE TERM............... I6,F19.5,F14.5) + ;(37H 9TH DEGREE TERM............... I6,F19.5,F14.5) + ;(37H 10TH DEGREE TERM.............. I6,F19.5,F14.5) + ;(74H0 SOURCE OF VARIATION DEGREE OF SUM OF MEAN) + ;(75H FREEDOM SQUARES SQUARE)+ ; 4 Z ;# \ ;$ ;$,!p ,!p ,!p ,!p ,!p + 9 ;# ;$\ ;',Ap / ,Ap / ,Ap -|p t ;1 < < D < < < D <-\ Ao4 < < @ <@ < @ <!$ <, A' D < < < D <@@ <" <
=M.
/|o-\ B44 @ =S6b =R0b 7 +<X4 <^4 <b4 <k4 <n4 <p4 <x4 =4 =4 =4 = =S4$ =5d <`@@ =T+ = -\ @d4 =S @ =T+ = =S4$ =5d <e!$ D =T+ = !$ =S D =O-\ @d4 =O @ =P-\ @d4 =S =P @ =T+ = =S4d =-\ Ao4 =S @ =T+ = -\ AQ4 =S @ =T+ = " =S4D <_5d =" =B =S4$ <u5d = =B D =T+ = -\ @d4 =S @ =O-\ <?4 =O @ =T+ = ` =K @ =T!$ =T =S F =U!$ =T!& =U F =U =U4$ =5d =" =U4D <_5d =-\ @d4 =U @ =O-\ <?4 =O @ =T+ = =U4$ =5d =
-\ @d4 =U @ =O-\ <?4 =O @ =T+ = -\ @d4 =U @ =O-\ <?4 =O @ =P-\ @d4 =U @ =P-\ <?4 =P =P @ =T+ = =S4D =!$ =S D =T+ = =R =S D =T+ = =R =S D =T+ = " =&b =S =R + =# =S4D <_ =S =R, A D =T $ H$ =L. =S( =M. =T H |o@J |o =S3: =K9 <Q =Q3: =L9 <L+ =?+ =9(18H0THE VALUE OF CASEI4,83H OF THE DEPENDENT VARIABLE VIOLATED THE RESTRICTION FOR TRANSGENERATION OF THE TYPE, I3,1H./52H THE PROGRAM CONTINUED LEAVING THIS VALUE UNCHANGED.) + =?4 Z =J \ =J =K,!p ,!p ,!p , p , p , p + <? =J =J\ =N/ ,Ap -|p 0 9~j =U 4 O@ >=+ =Y4 @@ >=O "$ D >> $ : INX |H=\+ =q
=v6@ >= J =w
=vyJ =xZ =w+ =q J =xz =w+ >:
z@ + =q #p & >
3L=y+ =l7@=y /& 5f =e7 + =q@@ =z: =z L =y
PL=z+ =pR d. R=zd$ 2N + =g: =z: kN
y1kN
y CB` x=xx =yH>9Z =w0B + =q d
:` >>+ =q+ =`x>>4 }X>? \ ?$ @ ?$< ?,0< 0| + 1\ + >M,>p>>Z p>>+ p @ h>p@ p>p@(?
@0?@ x>w@ >w@8?@(?@ P?@ P?@ h>p@>U@ >U@>o@>op(?[ (/< 0"` S<p X< 0 p 3@ ?-+ >S*| >O-< ?9wx>RZ` >?+ ?! @w+ >Q< ?- p 7 p + >p,> ,> ,> &w p , >k,& .< 7@p + >h p , >k" ?. ? .< p ` ?. w,& ,& 5 >Z.< p d ?/: ." Q ,& p ,& >` 9 >e.< 9 >[@@ ,^ ,^ ,^ + >pd @ @ & 0b ." ." )B}5@ >l,~ m< !< P\ ? < ?- p [ p l< 0@X + >vZ p .< / p Q \ ?!+ >x@@ ?!!< P\ ? 7@ ?#+ >| < ?# \ ?!@@ ?#!< P\ ? X X\ ? ?/7@ ?"D<7@ ?"A< \ ? < ? [`x ?$, x ,^x ?$+ >? >?Q< \ ? : >? \ ?!< ?0 p? | ?0 < \ ? @@ ?!+ ? @@ ? Q< \ ? < ?0 p? | ?1+ ? 7 ?2 ?4 \ ? @ ?X Q< \ ? ?4 \ ?!+ ? ~x?[`x ?$, x + ?Z \ ? @@ ? @@ ?!< ?- \ ?!+ ? 7 ?" ?"X\ >?@@ ?"@@ ?"+ ?P? ~0?$>x ! Z @
& ?5U` eB + ?+@ )@ G
" + ?'
& ?9+ ?^6$ 1 ,> BI. @
p .4 6$ s?.
.4 ?!. ? SEQIN}0?2 @ ?1SEQOUT @ ?3@ ?
%5 Source level error at user's loc
` Z (X^ . > S.~ (3~ + ?> ~ + ?IZ . \x <x *<x .-> BLez+ ?E!" b + " ?F b + Z . h + gg M?} ?I
& ?K b + ?9,
?NO CORE AVAILABLE - CAN NOT PROCEED
x ?Oa.3@1 ,> BIO@ @+ ?TgR~@1 ,> BI@@ @,> ,> @ 6 w+ ?a" @0B + ?\!"A`X#p 5@ ?Y/#p !" X#p + ?a\p + ?aa.9'1 ,> BI,> ,> O@ @+ ?a,>
6 + _ 4` ?i"` Q@ ,> < @, ,^ ,> < @,
,^ *b ?f+ ?t,> < @, ,^ 7@ @+ ?o,> < @,
,^ + ?q,> < @,
,^ Z 5" ?t,> < @,
,^ , 7@ @,
,> < @, ,^ , ,> < @ , ,^ ,> < @!,
,^ (@qd 1@ ,,
1@ #+ @0@ *+ ?t,> < @#, ,^ + ?t,^ ,^ ,^ ,~ (' Type G to Continue, X to Exit, T To trace.'/2H *,$) (A1) (1H 14A5/)(1H A5,1X,O6) PAUSESTOP h@.p X `@ @
p p@X `@ @ p @~P@ @
p I x x+@#C6 1 ,> BI, @.,~ [B 1 ,> BI, @.,~ [B 1 ,> BI, @.@ ,~ C6 1 ,> BI, @.` ,~ ,> e|P w+ @13!p p *| @0a|+ @5 p h" ab~ + @0,^ ,~ C6Md1 ,> BI, @A,~ [&r 1 ,> BI, @A,~ [&r 1 ,> BI, @A@ ,~ C6Md 1 ,> BI, @A` ,~ ,> e|P w+ @C2ap p *| @Ca|+ @G p h"~ ab~ + @C,^ ,~ CR+ @k4B @u+P ?K0
@v#p + @f ,~ u @vattempt to take SQRT of negative arg Kc3@ p p + AKc3K , A
,~ Kc3J , A ,~ Kc3I , A ,~ Kc3H4B A 5@ A 5" A+D ?K0
AU ,~ ,> ,> # $ )D /$ @,> 4d AX $ (F) + A5F A5" A"` , A*+ A# ,> < A , Av,^ @ ,> < A , AQ,^ 5& A" ,^ ,^ ,^ ,~ ! ,~ x x Kc#@ p p + A*Kc#K , A* @ ,~ Kc#J , A* @ ,~ Kc#I , A* @ ,~ Kc#H4B AN5@ A.5" A8+D ?K0
A-U ,~ D AM!$ @ AL B AM5" A5#` + AJ, A5!" B ,~ + A8(BdB + A85B A3 AM,~ +7` AM+ AA`d +D ?K0A<+D ?K0
A<U `d @ 6 AL+ A7 AM`B "` + A7/ AOid + AC+D ?K0A<# AL,> < AP, Av,^ @ ` AM @ ,> < AP, AQ,^ + A>U", A5 AL+ A8+ A2|AM! ,~ x Kc 1 ,> BI p 3" Al+ AV3b Al+ AX+D ?K0
AUU,~ +D ?K0AWB ,~ D Am F An@@ Am%" j" % Ak)/;` : XD Ag5f AaF + A.& @(|h& f Am Ai Aj Aj Am Ai D Ak@ Am An,~ !t0 ' "S'qf!um. .#Y% !v yO^ RXAnC2|t(1 ,> BI p 4@ B @ Au,> < B, Av,^ At,~ {e^b}AuC2|p 1 ,> BI p 5` Az4@ B+P ?K0B#p 3@ B + B) r. !@ B
B B
B B B
,~ +D ?K0
B B
,~ ,~ 0 _i/X3 6P'M 5( bB W
Rx`@ 8BT TO TAKE LOG OF NEGATIVE ARG(B WsdA psL! Ge!8ld Zm[7 zm[7 4rx trx [6m[ {6m[ By BIO- 1 ,> BI B* Bp 5` B!4@ B/+P ?K0B/!p
(Jr/* @(*XJ B-(Jnd ~ @( ? (B"(B (B "(B (B ( B` F B` @ !
B** ,~ Attemp to take DSQRT of Negative Arg g:=@ 1 ,> BIp + B6g:9d 5` B84B B;/" ab + B;2@ B<; @ 4 B;l ,~ ?C 1 ,> BI#p ,~ S0 1 ,> BI#p +" BB,~ U ,~ [> 1 ,> BI p &p ,~ KbN@ 1 ,> BI,
,~ BIY\ BKQ< X\ BK* + !$h X$h @@h *% " BS Bh L " Bh M+ x eX2G iSH YC aS iSH ~BSINX G YC GSH iSH aS aS I' IR
IR
IR
0 IR
@ IR
P IR
` IR
p [R
[R
[R
M?L@INX INX INX INX INX I2 I2 I20 I2@ G xBbiSH + 3