Hypothesis Tests of the Population Mean
Loading the math board and drawing, please wait…
This example demonstrates the graphical process of hypothesis testing for the population mean. Core mathematical concepts include statistical inference, hypothesis testing, sample mean, standard deviation, and p-value calculation. GeoGebra commands like Sequence, Element, Mod, If, Min are used, along with objects such as CnfSq, OpSq2, Seed, Op2, etc., suitable for high school and above learners to understand the principles and steps of hypothesis testing.
GeoGebra Commands & Parameters
Sequence(Mod[5 + (17 * k), 40] + 1, k, 1, 40) → OpSq2, {23, 40, 17, 34, 11, 28, 5, 22, 39, 16, 33, 10, 27, 4, 21, 38, 15, 32, 9, 26, 3, 20, 37, 14, 31, 8, 25, 2, 19, 36, 13, 30, 7, 24, 1, 18, 35, 12, 29, 6}Element(OpSq2, Seed) → Op2Mod(Op2, 8) → Ch3Sequence(Mod[3 + (23 * k), 40] + 1, k, 1, 40) → OpSq1, {27, 10, 33, 16, 39, 22, 5, 28, 11, 34, 17, 40, 23, 6, 29, 12, 35, 18, 1, 24, 7, 30, 13, 36, 19, 2, 25, 8, 31, 14, 37, 20, 3, 26, 9, 32, 15, 38, 21, 4}Element(OpSq1, Seed) → Op1Element(CnfSq, Mod[Op1, 4] + 1) → CnfSequence(Mod[6 + (19 * k), 40] + 1, k, 1, 40) → OpSq3, {26, 5, 24, 3, 22, 1, 20, 39, 18, 37, 16, 35, 14, 33, 12, 31, 10, 29, 8, 27, 6, 25, 4, 23, 2, 21, 40, 19, 38, 17, 36, 15, 34, 13, 32, 11, 30, 9, 28, 7}Element(OpSq3, Seed) → Op3Mod(Op3, 2) → Ch2Element(SzSq, Mod[Seed, 6] + 1) → SizeElement(PrbSq, Ch3 + 1) → TstPrbIf(Ch3 < 4, -1, 1) → DrNmbElement(XbrSq, Mod[Seed, 6] + 1) → XbrElement(StDvSq, Mod[Seed, 6] + 1) → StDvElement(AcSq, Mod[Seed, 6] + 1) → AccIf(DrNmb ≟ -1, μ2, μ1) → μ0Min(PVLT, PVGT) → PVHlfIf(PVHlf < 0.00010, " ", PVEQ) → PVCmp2If(PVHlf < 0.00010, "< 0.0002", ("= " * PVEQ)) → PVCmp1If(Ch3 < 2, PVLT, If[Ch3 > 5, PVGT, PVEQ]) → PVIf(PV < 0.00010, "< 0.0002", ("= " * PV)) → PVTxIf(Ch3 < 2, "less than", If[Ch3 > 5, "greater than", "not equal to"]) → IETxIf(Ch3 < 2, "<", If[Ch3 > 5, ">", "≠"]) → IE1If(Ch3 < 2, "≥", If[Ch3 > 5, "≤", "="]) → IE0If(Ch3 < 2, "left-tailed", If[Ch3 > 5, "right-tailed", "two-tailed"]) → TstTypIf(Ch3 < 2, PVLTtxt, If[Ch3 > 5, PVGTtxt, PVEQtxt]) → PVCclIf(PV < α, "<", "≥") → DcSgnIf(PV < α, "is strong", "is not strong") → DcTxIf(PV < α, "is", "is not") → DcEvIf(μ0 < 0, (("(" * μ0) * ")"), μ0) → MuTxElement(PSSq, Mod[Seed, 6] + 1) → PS0