高尔顿板与二项分布
几何画板及绘图内容加载中,请稍等……
该范例通过高尔顿板演示了二项分布的原理。它展示了每次小球通过一系列钉子时,最终落在不同槽中的概率分布情况。核心数学概念包括二项分布及其概率计算。通过使用GeoGebra命令如Sequence、Join、Shuffle等,可以动态地模拟小球的运动轨迹。适合高中数学教学,特别是概率统计和组合数学的教学。
GeoGebra 命令及参数
Sequence(Sequence[(i, j), i, j / 2, n - j / 2], j, 1, n) → boardSequence(Polygon[(i - 0.5, 0), (i + 0.5, 0), (i + 0.5, (BinomialDist[n, 1 - p, n - i, false] * h)), (i - 0.5, (BinomialDist[n, 1 - p, n - i, false] * h))], i, 0, n) → BinomialDistJoin({Sequence[-0.5, i, 1, ((10 * n) * (1 - p))], Sequence[0.5, i, 1, ((10 * p) * n)]}) → unshuffleShuffle(unshuffle) → shuffleAppend((n / 2, n + 1), Sequence[(n / 2, n + 1) + (Sum[First[shuffle, i]], (-i)), i, 1, n]) → pathSequence(Segment[(i - 1 / 2, 0), (i - 1 / 2, 1 / 2)], i, 0, n + 1) → containerAppend(Sequence[Segment[Element[path, i - 1], Element[path, i]], i, 1, n + 1], Segment[Element[path, n + 1], Element[path, n + 1] + (0, -1)]) → linePoint(line, t) → PPolyLine(((n - 1) / 2, n + 1), ((n - 1) / 2, n + 0.5), (-0.5, 0.5), (-0.5, 0), (n + 0.5, 0), (n + 0.5, 0.5), ((n - 1) / 2 + 1, n + 0.5), ((n + 1) / 2, n + 1)) → lSequence(Polygon[(i - 1.5, 0), (i - 0.5, 0), (i - 0.5, (Element[rec, i] / Sum[rec] * h)), (i - 1.5, (Element[rec, i] / Sum[rec] * h))], i, 1, n + 1) → box_1Sum(rec) → numberSequence(Text[(Element[BinomialDist, i] / h * 100) + "%", (i - 1.4, -0.4)], i, 1, n + 1) → binopercentSequence(Text[Element[rec, i], (i - 1.4, -0.9)], i, 1, n + 1) → list1Sequence(Text[(Element[rec, i] / number * 100) + "%", (i - 1.4, -1.4)], i, 1, n + 1) → list2Sequence(Text[("box " * i), (i - 0.3, 0.25)], i, 0, n) → boxnumber