1 REM **** HP BASIC PROGRAM LIBRARY ******************************* 2 REM 3 REM STAT06: CALCULATES THE SIGN TEST CONFIDENCE INTERVAL 4 REM USING FRACTIONAL COUNTS 5 REM 36724 REV A 10/73 6 REM 7 REM **** CONTRIBUTED PROGRAM ************************************ 9000 REM STAT06--SIGN TEST AND CONFIDENCE INTERVAL 9002 DIM D[1000] 9004 PRINT "CONFIDENCE INTERVAL BY SIGN TEST, FRACTIONAL COUNT." 9006 READ N,C 9008 FOR I=1 TO N 9010 READ D[I] 9012 NEXT I 9014 LET I=1 9016 IF D[I] <= D[I+1] THEN 9030 9018 LET T=D[I] 9020 LET D[I]=D[I+1] 9022 LET D[I+1]=T 9024 IF I=1 THEN 9030 9026 LET I=I-1 9028 GOTO 9016 9030 LET I=I+1 9032 IF I