. **************************************[ *** PROGRAM TO CALCULATE HULL'S *** *** COEFFICIENT OF CORRELATION *** *** FRED C. KRAUSE/Q-LINK FREDK12 *** *** NOVEMBER 4, 1988 *** *** HULL/CORR128 ***< **************************************U53280,0:53281,0:%l A(999),B(999):77 "NUMBER OF PAIRS OF VALUES";N X10:X20:Y10:Y20:AB0:% 1,0 J1N"NUMBER OF PAIRS OF VALUES = ";:"###";N1J;:"""ENTER VALUE X("J;") ";)1,X:G"ENTER VALUE Y("J;") ";P1,YfX1X1X:X2X2X2|Y1Y1Y:Y2Y2Y2ABAB(XY)A(J)X:B(J)Y1X1X1N:X2X2N:ABABNY1Y1N:Y2Y2NSA(X2(X1)2)SB(Y2(Y1)2) R(AB(X1Y1))(SASB):<PE.6745(1(RR))(N)bX14:" (X) ----- (Y) ";: X14:" ";:!"J1N#"####.##";A(J);:" ";:"####.##";B(J);:" ";$% &7)"NUMBER OF PAIRS N = ";:"######.####";N< '18)"MEAN X = ";:"######.####";X1;e (50)"MEAN Y = ";:"######.####";Y1 )13)"DEVIATION X = ";:"######.####";SA; *45)"DEVIATION Y = ";:"######.####";SB!!+9)"COEFFICIENT (R) = ";:"######.##";R;:42)"PROBABLE ERROR = ";:"+/-###.##";PEq!,"CONFIDENCE LEVELS: 50%: R = ";:"##.##";RPE;:" TO ";:"##.##";RPE;!-" 100%: R = ";:"##.##";R(4PE);:" TO ";:"##.##";R(4PE)!.15)" ANOTHER (A) PRINT (P) QUIT (Q) " "/X$:X$""47"0X$"A"10("1X$"P"526"2X$"Q">"347I"44,4,0m"5:35)(15)"PRINTING!""64,"HULL'S COEFFIECIENT OF CORRELATION:":4"7X14:4," (X) ----- (Y) ";:"8X14:4," ";:"94":J1N?#;4,"####.##";A(J);:4," ";:4,"####.##";B(J);:4," ";E#<O#=4:4#>4," MEAN A = ";:4,"######.####";X1#?4," MEAN B = ";:4,"######.####";Y1#@4," DEVIATION X = ";:4,"######.####";SA#$A4," DEVIATION Y = ";:4,"######.####";SBX$B4," PROBABLE ERROR = ";:4,"+/-###.##";PE$C4," COEFFICIENT (R) = ";:4,"######.##";R$D4," CONFIDENCE LEVELS: 50%: R = ";:4,"#.##";RPE;:4," TO ";:4,"##.##";RPEH%E4," 100%: R = ";:4,"##.##";R(4PE);:4," TO ";:4,"##.##";R(4PE)Q%F4:%G15)" ANOTHER (A) PRINT (P) QUIT (Q) "%HX$:X$""72%IX"="A"THEN100%JX$"P"52%KX$"Q""":%L72'&M:14)(14)"OEFFICIENT OF ORRELATION SING ULL'S ORMULAc&N14) ""'O"HE OEFFICIENT OF ORRELATION IS THAT RATIO WHICH EXPRESSES THE EXTENT TO WHICHCHANGES IN ONE VARIABLE ARE DEPENDENT UPON CHANGES IN A SECOND VARIABLE."'P"ULL'S FORMULA IS USEFUL IN CALCULATING A CORRELATION WHENEVER THE RELATIONSHIP BETWEEN THE TWO SETS OF MEASURES IS LINEAR."'Q"O USE PROGRAM:"'R4)"1. NTER THE NUMBER OF PAIRS OF VARIABLES."6(S4)"2. NTER THE VALUES FOR THE VARIABLES "(34)""(34)" AND VARIABLES "(34)""(34)"."(T"HE PROGRAM LISTS THE NUMBER OF SETS OF VARIABLES; LISTS THE PAIRS OF VARIABLES;AND CALCULATES THE:"(U4)"1. EAN "(34)""(34)(V4)"2. EAN "(34)""(34))W4)"3. TANDARD EVIATION "(34)""(34)C)X4)"4. TANDARD EVIATION "(34)""(34)o)Y4)"5. OEFFICIENT OF ORRELATION ())Z4)"6. ROBABLE RROR AND ONFIDENCE ANGES")[24)" Ӡ٠٠Ϡ "(142):E208,1:A$)\