[Maple Math] Test

[Maple Math] Test Preliminary Definitions

The [Maple Math] Probability distribution, [Maple Math] is given by [Maple Math] [Maple Math] ,

where [Maple Math] is the lower boundary and [Maple Math] is the upper boundary.

> Digits := 20; z := 'z';
Ccd := (a,b,df) -> (((1/2)^(df/2))/GAMMA(df/2))*int((zeta^(df/2-1)*exp(-z/2)),z=a..b);

[Maple Math]

[Maple Math]

[Maple Math]

> Ccd(0,19.023,9);

[Maple Math]

> evalf(%);

[Maple Math]

[Maple Math] Test

> A := [[1,2],[5,10]];
n := A[1,1] + A[1,2] + A[2,1] + A[2,2];
F := [[0,0],[0,0]]:
F[1,1] := (A[1,1] + A[1,2])*(A[1,1] + A[2,1])/(n-A[2,2]):
F[1,2] := (A[1,1] + A[1,2])*(A[1,2] + A[2,2])/n:
F[2,1] := (A[2,1] + A[2,2])*(A[1,1] + A[2,1])/n:
F[2,2] := (A[2,1] + A[2,2])*(A[1,2] + A[2,2])/n:
F;

[Maple Math]

[Maple Math]

[Maple Math]

>

>