Google
 

Trailing-Edge - PDP-10 Archives - decuslib10-09 - 43,50466/bmd05m.sav
There are no other files named bmd05m.sav in the archive.
h'5hg;.-7\x-5`;x. 8h/+>(60H1BMD05M - DISCRIMINANT ANALYSIS-SEVERAL GROUPS - VERSION OF ,18HJUNE  9, 1966     ,/41H HEALTH SCIENCES COMPUTING FACILITY, UCLA)   $ Dm-\6t4
h "hB
no48opp : Zq 51:9Eq k3Dn2Fn7+Pl3Dn2Fn7+c "2b
n +c-\4f4p4m 8.p Dr $3$qgO q1fgOA4$Z $ Dq "Zb  "0b  "bor "$.4"&.4$5$8"$.8 &/4.8$5$? : Zq"$K.h55dG3:49e"$.r &/4.r$5$Q-\3k4q4o4m4p r D8"o5d@ : Zq : Zr $
$.q@@63:89r q3:89q : Zq h5 D5 : Zs : Zs $
$.s@@n : Zr s(.q ($ Hj.   ($s.q .J 
s(
.
q Jj.
j ( *$
s.
q(.J (
$s 
s.
D(n3:59~ s3:89z s3:89y : Zs : Zs &
$ s.  nD 63:89 s3:89 "b  "kbq  : Zr "rb  "sb : Zs $
$.rn3:89 r 3:89 q3:49w@@t : Zq h5` @t tDt3:49(`4 @u"uDt : Zq : Zr &
$ q.  6t D 6 $
$ q. 6 Hn3:89/ q3:89. "vb  : Zq "rb  "sb : Zr $
$.q63:89> q 3:89:-\2R4y484u4	Q4/
 "b  "yb  : Zq "rb  "sb : Zr $
$.qn3:89N q 3:89J : Zq : Zr $
$.q@@	S : Zv &
$.q 6 &
$r . n q.D 	S3:89Y r3:89U q3:89T "b  "}b  : Zq "rb  "sb : Zr $
$.q	S3:89j q 3:89f-\/j454y4.M4844 : Zq : Zr $
$.q@@6 : Zv &
$r .  n ($.q .J q.D 63:89x r3:89t q3:49s : Zq : Zr &$.q .JD &
$q."D~3:89 q3:49 : Zq : Zr $
$.q@@	S : Zv &
$.q 6 &
$r . ~ q.D 	S3:89 r3:49
 q3:49 "b  : Zq Zh/
3:49 "b : Zq /
3:49  "b  : Zq "bq : Zr $
$q.63:49' q 3:89$ "b  : Zq Zr $
$ (
$r.  	S F	Z3:49/ "b : Zq $
$	Z3:495  : Zv h5 D5 : Zq : Zr $
$@@ : Zv &$q (.v.  &
$.r6 &
$rD3:89? r3:49< : Zr &
${	Z&$q(.v.D3:49J5q3:59;v3:499!$	!& w H : Zw &$r /(.q Hj.   (.q.5$r $$r /(.q Fj. 
w(
.
q.  H $$r /(.q.`w @ w3:49` r3:59[ q3:49Y : Zq h5 D5 : Zr@@x : Zw &$r ( 
q.
 Jj.
 ( 
/(
.
q Fj. Dk-\:I4k @( &$r (.q. Dx3:49z $$r /(.q.!( H : Zw &$r ( 
q.
 Jj.
 (x D(3:/9 r3:59y q3:49w "b -\10 : Zq h5 D5 : Zv $$.q@@" : Zr@@x : Zw &$r v(.q Hj.   (.q.4d):x w3:49!"$.4 x/5F/ $$v q.:" r3:59 v3:49 q3:49 "b  "b 6b40b7+84;4@4E4J4O "b : Zq /
3:49= +T " b : Zq /
3:49B +T "%b : Zq /
3:49G +T ")b : Zq /
3:49L +T ".b : Zq /
3:49Q  "b  : Zq $$/.@@" : Zr &$.q " &$/ q..D "3:49Y "bq : Zr $$.q"3:/9a  "b  q3:49V+@+k(A6   ,A2,5I2,5I3,37X,I2)+r(52H0MATRIX OF CROSS PRODUCTS OF DEV. FROM MEANS - GROUPI2) +s(4H ROWI3)+v(1H F14.5,7F15.5)   +y(18H0DISPERSION MATRIX)  +}(29H0INVERSE OF DISPERSION MATRIX) +(46H0TEST OF ACCURACY OF DISPERSION MATRIX INVERSE)    +(9H0FUNCTIONI13,4I16)    +(12H0COEFFICIENT)   +(5X,I2,F20.5,4F16.5)+(9H0CONSTANTF18.5,4F16.5)+(22H0CLASSIFICATION MATRIX)   +(6H0GROUP)+(1H I3,8X,6I11)+(14H0PROBLEM NO.  A2/20H NUMBER OF VARIABLESI4///)+(1H0)+(1H )+ (9H0FUNCTIONI14,12H       TOTAL)   +%(9H0FUNCTIONI14, I11,12H       TOTAL)   +)(9H0FUNCTIONI14,2I11,12H       TOTAL)   +.(9H0FUNCTIONI14,3I11,12H       TOTAL)   +2(9H0FUNCTIONI14,4I11,12H       TOTAL)   +8(' PROBLM OR FINISH CARD EXPECTED. CARD READ WAS  ',A6) ":b4 +?(1X,I3,' NUMBER OF GROUPS IS ILLEGAL')  +c "Ab8 +G(1X,I3,' NUMBER OF ORIGINAL VARIABLES IS ILLEGAL')+c "Jb q5q +P(' SAMPLE SIZE OF ',I4,' FOR GROUP ',I2,' IS ILLEGAL') +c "Sbr +Z(1X,I5,' NUMBER OF VARIABLES AFTER TRANSGENERATION IS ILLEGAL')  +c+c(1H023X71HNUMBER OF VARIABLE FORMAT CARDS INCORRECTLY SPECIFIED, ASSUMED TO BE 1.)   "$.m4df mX@f-\;+  +0BMD05M    `kPROBLM    FINISH    u/@@/u@@/u : Z/v@@h/y3:/s9/ : Z/v ./r ` @/v /vD/u3:/t9/ : Z/v : Z/w ./r ` @/w /w &$/v. /s.'} /vD /y3:/t9/% /v /y/u D/y /v3:/s9/# : Z/v : Z/w@@/w : Z/x ./r ` @/x &$/w. /s. '} /w /y *$
/v.
 
/s.
 7} 
/v0/y/xD/w3:/t9/4 /w &
$/w./v /r.'uD/u /w3:/s9/2 /v3:/s9/1"$./t$/s D/y "/db/u  "/Ob/u/y/t/s +/d(11H0THE VALUE F10.5,31H CAN BE USED AS CHI-SQUARE WITHI3,/56H DEGREES OF FREEDOM TO TEST THE HYPOTHESIS THAT THE MEAN/32H VALUES ARE THE SAME IN ALL THE I3,18H GROUPS FOR THESE I2,/11H VARIABLES.//) +/i(1H0/33H GENERALIZED MAHALANOBIS D-SQUAREF12.5)   +/o4 Z/p \/q  /q, p, p, p,!p,!p+/ /p /q-|pj(0 "0ab 6b40b7+0	40
40404040  "0yb : Z15 /
3:490$ "1b : Z15 /
3:490 +0$ "1b : Z15 /
3:490 +0$ "1b : Z15 /
3:490 +0$ "1%b : Z15 /
3:490!  : Z16 "0gb  "0ib  h5 D5 : Z16 &$ /(.16. @ @176b40b7+0140440<40E40M40V "0kb16 : Z17 $$16 (.16.3:/90617 +0^ "0mb16 : Z17 $$16 (.16.3:/90>17 +0^ "0pb16 : Z17 $$16 (.16.3:/90G17 +0^ "0sb16 : Z17 $$16 (.16.3:/90O17 +0^ "0vb16 : Z17 $$16 (.16.3:/90X17  163:590* 163:490%+0g(53H0EVALUATION OF CLASSIFICATION FUNCTIONS FOR EACH CASE)  +0i(6H GROUPI3)   +0k(6H  CASE)+0m(I5,F21.5,F15.5,I12)+0p(I5,F21.5,2F15.5,I12)    +0s(I5,F21.5,3F15.5,I12)    +0v(I5,F21.5,4F15.5,I12)    +0y(I5,F21.5,5F15.5,I12)    +1(9H0FUNCTIONI12, 41H            LARGEST     FN.NO.FOR LARGEST/32X,27HPROBABILITY     PROBABILITY)   +1(9H0FUNCTIONI12, I15,41H            LARGEST     FN.NO.FOR LARGEST/47X,27HPROBABILITY     PROBABILITY)    +1(9H0FUNCTIONI12,2I15,41H            LARGEST     FN.NO.FOR LARGEST/62X,27HPROBABILITY     PROBABILITY)    +1%(9H0FUNCTIONI12,3I15,41H            LARGEST     FN.NO.FOR LARGEST/77X,27HPROBABILITY     PROBABILITY)    +1/(9H0FUNCTIONI12,4I15,39H            LARGEST   FN.NO.FOR LARGEST/92X,27HPROBABILITY     PROBABILITY) +124 Z13 \14+0 13 14-|pk`17!$ D2\ : Z2_ .2] Z .2] Z &
$. 2[. 'u D2_  Z2` 2_ Z2` &
$.2` 2[. $'uXD1F-\;
41F @2^-\;
42_2^5 1Q &
$2`.2` 2[. 'u D2_ 2_.2] 2` F 2_.2] 2` F 2`3:2\91B 2`3:2\91A 2_.2]  D2`"2_ 2_.2].4d1g : Z2` &
$.2_ 2[."'u D2a $
$ 2_. 2[..2` 
2[.
 
7u J'u $
$.2` 2[. 2a Hu3:2\91Y 2_.2]  D2`"2_ 2_.2].4d1z : Z2` &
$2_. 2[."'u D2a $
$2_. 2[. *
$
2`.
 
2[.
 7u Hu $
$2`. 2[. 2a Hu3:2\91l : Z2`"2_.2`4D2 &
$2_ 2`. 
2[.
 /u 
2_.
 2[.?u"D/u 2`3:2\91{ : Z2` : Z2`"2_.2`4D2"2_.2`4D2 &
$2_.2` 2[. 'u (
$2` 
2_.
 
2[.
7u 
2`.
 2[.D?u 2`3:2\92 2`3:2\92 : Z2`"2_.2`4D2 &
$2` 2_. 
2[.
 /u ,
$
2_.
2_ 2[.?u D/u 2`3:2\92 &
$2_.2_ 2[. 'uD2\!$ &
$2_ 2_. 
2[.
D/u 2_3:2\919 2\ D2_>2_ 2_4d2Q 2_.2]  D2`"2_.2`4d2? : Z2` &
$2_. 2[. 'u D2a $
$2_. 2[. *
$
2`.
 
2[.
"7u Hu $
$2`. 2[. 2a Hu3:2\921 2_.2]  D2`"2_.2`4d2+ : Z2` &
$.2_ 2[. 'u D2a $
$ 2_. 2[..2` 
2[.
"
7u J'u $
$.2` 2[. 2a Hu3:2\92C+2++2W4 Z2Z \2Z  2[, p,!p,!p, p, p+18 2Z 2Z\ 2]/ ,Ap-|pmh2a $	$D3t@@3w "3gB : Z3w 3x3:3t92d  "2lb : Z3w 3x3:3t92i +2p(' VARIABLE FORMAT IS',/(5X,18A4))  : Z3w h5 D5 : Z3x 3uX@2u "3yQ"ZB : Z3x $$3x (.3w.3:892v 3x 3:592r 3w3:492p 3u4d3-\6S49484543w4443u"3w5d3i 3v.D8 : Z3w h5 D5`5 @.M : Z3x $$.3w@@.J : Z3x &$ 3x(.3w.  &$3x 
3w.
D(.J3:593
 &$3x 3w.  .J.M D .J 3x3:893 3w3:493@@/
 : Z3w h5.D/
 Zh/
3:4936b40b7+343"43'43,431436 "3Qb : Z3w /
3:493# +3: "3Ub : Z3w /
3:493( +3: "3Yb : Z3w /
3:493- +3: "3^b : Z3w /
3:4932 +3: "3bb : Z3w /
3:4937  "3Ib : Z3w 53:493</
  "3Lb  : Z3w "3Nb3w : Z3x $$3w..J3:493D 3w 3:893A+3L(7H0SAMPLEI17,5I16) +3N(12H0MEAN SCORES)   +3Q(I7,5H     5F16.5)  +3U(6H0GROUPI18,17H            TOTAL) +3Y(6H0GROUPI18,I16,17H            TOTAL)  +3^(6H0GROUPI18,2I16,17H            TOTAL) +3b(6H0GROUPI18,3I16,17H            TOTAL) +3g(6H0GROUPI18,4I16,17H            TOTAL) +3h(18A4)    +3o"$W D3u+3h+3o4 Z3s \3s  3t,!p,!p,!p,!p+2a 3s 3s\ 3v/ ,Ap,Ap-|p|h4R 4n4$4`5d4U $ D4n 4n/4n4D4Z $3D4n+4[ 4nX@4Y"$.4n4D4^"$.4n4D4` 4nX@4^ 4n D4n+4i "4ab +4e(25H ERROR ON TAPE ASSIGNMENT)-\;+4i4 Z4l \4m  4m,!p,!p+4S 4l 4m\ 4n,Ap,Ap-|pb(4o+4|44p  6]Q * 6b Z6b \6c  6c,!p 6c$"D6h-\9\46h 6c F6i-\9A46i!86]X8*8 6b 6c-|p@@6k "6(b  "6b  : Z6l "6B6l6m6m6n6n  6k3D6l+5
 "6Nb6l "$s D6g+6 "6%b6l6m6m6n6n "$.6m$6m5$5"$.6m4$5@6n @6o : Z6o .6f  D6p : Z6p &$ 6n(.6o. 
6e.
 /_ D6q6b6m0b7+545$45)45145445645?45X45[45]45_45c45i45o45u 6q4$65d5'@@6q+6-\9\46q @6q+6 6q4$65d5,!$ D6q+6!$6q D6i-\9\46i @6j-\9\46q6j @6q+6 6q4d6-\:g46q @6q+6-\:I46q @6q+6"6q4D5&5d6"6\6q4$5;5d6 6\ D6q+6-\9\46q @6i-\4p46i @6q+6`6p @6r!$6r 6q F6r!$6r!&6r F6s 6r4$65d5L"6s4D5&5d6-\9\46s @6i-\4p46i @6q+6 6s4$65d5Q-\9\46r @6i-\4p46i @6q+6-\9\46r @6r-\9\46s @6s-\4p46s @6i-\4p46r6i @6q+6 6q4D6!$6q D6q+6 6n6q D6q+6 6n6q D6q+6"6q4D5&5d6 6q 6o,:  D6q+6 6q &$6p 6o(.6o. 
6e.
/_ D6q+6 6q &$6p 6o(.6o. 
6e.
/_ D6q+6 6q &$6p 6o(.6o. 
6e.
/_ D6q+6 &$6p 6o(.6o. 
6e.
 /_4D6 6q &$6p 6o(.6o. 
6e.
/_ D6q+6 6k4$6"$s D6k"$s D6g "6,b6l  "6Ab6p +6
 $$6p 6m(.6o. 6e. 
6q J'_ 6p3:6p95 6g5$6 "6Db6o  6o3:6g95 6g4$6 6l3:6h95 6g5$6S "6Ib +6(A4,2X,I3,I2,I3,F6.0)    +6%(46H0CARD    NEW     TRANS    ORIG.   ORIG. VAR(B)/45H  NO. VARIABLE   CODE    VAR(A)   OR CONSTANT)+6((2H  I2,I8,2I9,F15.5)    +6,(1H06X,23HTRANS GENERATOR CARD(S)) +6A(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/28H FOR THE ITEMS LISTED BELOW./) +6D(10H ITEM NO. I3)   +6I(32H0ITEMS ABOVE ARE FROM GROUP NO. I2//)    +6N(41H0PROGRAM CANNOT CONTINUE FOR THIS PROBLEM)    +6S(30H0ERROR ON TRANSGENERATION CARDI4)   +6Y4 Z6d \6d  6e, p,!p, p,!p,!p,!p+4o 6d 6d\ 6h/ ,Ap-|p 0 9~jx6jTRNG  6s4O@7[+6v4@@7[O"$ D7[ $:INX|H6y+7 
76@7[ J7 
7J7Z7+7 J7z7+7W
z@+7 #p &> 
3L7+7
7@7 /&5f77 +7@@ 7: 7 L 7 
PLd7+77d$2N+7:7:@7\,~-|pkN
y1kN
y CB`x7x7H7WZ70B+7	d
:`7[+7+6~x7[4}X7\@\8A@@8B<8I0<0|+1\+7j,>p7[Zp7[+p@h8K,p7&p+8x.< pd8L:."PQ,& p,&>`98.<97x@@,^,^,^+8@A< \8> <8=[`x 8B,x,^x 8A+7\ 7\Q< \8=:7\  \8><8M p89|8N < \8>@@8?+8@@8> Q< \8=<8M p89|8N+878P 8Q \8> @80XQ< \8= 8R \8>+8~x80[`x 8B,x+88Z \8=@@8>@@8><8K \8?+878@ 8?X\7\@@8@@@8?+8P8:~08B>x! Z @
&8RU`eB+8H@)@G 
"+8E
&8V+8{6$1,>;.@
p.46$h87.
.48>.8=SEQIN}08O@8OSEQOUT@8P@80
%5 Source level error at user's loc	
	`Z(X^. >S.~(3~+8[	~+8gZ. \x <x*<x .->;ez+8b!"	b+  "8d	b+Z. h+ggM?} 8f
&8i	b+8W,
?NO CORE AVAILABLE - CAN NOT PROCEED
x 8ma.3@1,>;O@9++8rgR~@1,>;@@9+,>,>@6 w+8~"9,0B+8z!"A`X#p5@8w/#p!"X#p+8~\p+8~a.9'1,>;,>,>O@9++8~,>
6+ _4`9"`Q@,> <9-,,^,> <90,
,^*b9+9,> <91,,^7@9++9
,> <94,
,^+9,> <96,
,^Z5"9,> <97,
,^,7@9+,
,> <99,,^,,> <9<,,^,> <9?,
,^(@qd1@,,
1@#+90@*+9,>9<9@,,^+9,^,^,^,~('eTypeGtohContinue,Xto Exit,TTotrace.'/2H*,$)(A1)(1H@14A5/)(1HA5,1X,O6)PAUSESTOPh9+.pX`9.9(pp90X`929)p09*p95pj9+p96pp98X`9:9"X~P9=9'px|p9@CR 9n@,~B@ B9n""X+9d4B9m+P8h0
9o#p+9^  ,~u 9nattempt to take SQRT of negative argKc3@ p p+9~Kc3K  ,9~ 
,~Kc3J  ,9~ ,~Kc3I  ,9~ ,~Kc3H4B:5@:5":+D8h0
:U ,~,>,># $)D/$@,>4d:X $(F) + :5F:5":
"` ,:#+:#  ,> <:,:n,^@,> <:,:I,^5&:",^,^,^,~! ,~xxKc#@ p p+:#Kc#K  ,:# @,~Kc#J  ,:# @,~Kc#I  ,:# @,~Kc#H4B:F5@:&5":0+D8h0
:%U ,~ D:F!$ @:E B:E5":-#`+ :B,:-!"B,~+ :1(BdB+ :15B:,  :F,~ +7`:E+:9`d +D8h0:5+D8h0
:5U `d @6 :E+:0 :E`B"`+:0/:Gid +:<+D8h0:5#:E,> <:H,:n,^ @`:E@,> <:H,:I,^+:6U",:-:E+ :1+:*|:F! ,~xKc1,>; p3":e+:O3b:d+:Q+D8h0
:NU ,~+D8h0:P  ,~ D:e F:f@@:f%"j"%:c)/;`:XD:_5f:XaF+:X.&@(|h&f:f :b:c :b :f:aD:d@ :e :f,~!t0_'"S'qf!um.	.#Y% !vyO^	RX:fC2|t(1,>; p4@:~ @:m,> <;,:n,^:m,~{e^b}:mC2|p1,>; p5`:r4@:~+P8h0;#p3@;+;)r. !@;! n@;(|h"; ; B; ;;;;;;,~+D8h0
: ;,~  ,~ 0_i/X3 6P'M 5( bB W
R `@8;x:mATTEMPT TO TAKE LOG OF NEGATIVE ARG}H;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+g