F-分佈概率 (F-distribution)

F-分佈概率

程式編寫日期: 2008年7月9日

程式需要在 SD 模式下執行，因此在選擇新程式位置後，按 4 選用SD模式。

注意 : π^r 是按 SHIFT EXP SHIFT Ans 2 ，藍色的英文字為統計模式中的變數(n 按 shift 1 3 ，x為平均x 按 shift 2 1)

程式 (343 bytes)

ClrStat: 0→M: ?→A: ?→B: ?→C: B + C - 4 ; B DT:

AB ÷ (AB + C→A: Lbl 0: Fix 0: Rnd( B÷2: Norm 1: B - 2Ans =>

Goto 1: 1→D: 1→X: C→Y: While x≧Y: DAY ÷ (Y - C + 2→D:

D + X→X: Y + 2→Y: WhileEnd: 1 - M - X cos( π^rM ) (1-A) ^( C÷2◢

Lbl 1: If M=0: Then 1→M: C→B: n→C: 1 - A→A: Goto 0: IfEnd:

tan^-1( √( A^-1 - 1→A: Rec( 1 , A): 1→C: 1→D: 2→M: While B - 3≧M:

CX²M ÷ (M + 1→C: C + D→D: M + 2→M: WhileEnd: 2A÷π^r +

2DXYπ^-1(B>1→A: n=1 => A◢ 1→C: 1→D: B+1→M: While x≧M:

CY²M÷(M - B + 2→C: C + D→D: M+ 2→M: WhileEnd:

4DYπ^-1X^( B→C: B=1 => A - C÷2◢ 2→M: While B - 1≧2M:

CM ÷ (M - . 5→C: M + 1→M: WhileEnd: A - C

例題1: 若 F 分佈 (F distribution)的自由度分別為1(分子)及2(分母)，求P(0≦F≦1.5)的概率。

Prog 1 再按 1.5 EXE 1 EXE 2 EXE (顯示概率為0.6547)

例題2: 若 F 分佈 (F distribution)的自由度分別為2(分子)及1(分母)，求P(0≦F≦1.5)的概率。

Prog 1 再按 1.5 EXE 2 EXE 1 EXE (顯示概率為0.5)

例題3: 若 F 分佈 (F distribution)的自由度分別為1(分子)及3(分母)，求P(0≦F≦1.5)的概率。

Prog 1 再按 1.5 EXE 1 EXE 3 EXE (顯示概率為0.6919)

例題4: 若 F 分佈 (F distribution)的自由度分別為3(分子)及5(分母)，求P(0≦F≦1.5)的概率。

Prog 1 再按 1.5 EXE 3 EXE 5 EXE (顯示概率為0.6778)

註: 顯示答案後，若程式未終止，請按 AC 終止程式。