掷骰子模拟

几何画板及绘图内容加载中，请稍等……

2022-03-05 23:03

数列概率统计函数图像

本范例通过模拟掷一个六面骰子，演示概率统计的基本概念。它使用了序列、条形图等GeoGebra命令，适合初中及以上学生学习概率统计。

GeoGebra 命令及参数

Sequence(Random[1, 6], k, 1, 100) → die1list, {5, 2, 6, 6, 1, 2, 5, 5, 4, 4, 5, 6, 2, 4, 4, 3, 6, 6, 2, 3, 2, 6, 1, 2, 1, 5, 2, 2, 2, 4, 5, 6, 6, 6, 1, 1, 5, 2, 5, 6, 1, 1, 2, 2, 4, 2, 5, 2, 6, 6, 1, 4, 4, 4, 5, 4, 2, 4, 5, 3, 2, 5, 2, 4, 3, 2, 1, 6, 2, 5, 5, 5, 4, 1, 5, 2, 4, 3, 6, 1, 5, 2, 3, 1, 3, 2, 2, 1, 1, 3, 6, 4, 3, 1, 6, 4, 4, 5, 6, 4}
Sequence(Random[1, 6], k, 1, 100) → die2list, {4, 6, 1, 1, 5, 1, 1, 1, 1, 5, 3, 1, 1, 2, 2, 6, 5, 2, 2, 5, 1, 1, 1, 2, 5, 6, 1, 6, 3, 4, 2, 6, 5, 4, 4, 1, 1, 1, 5, 4, 4, 5, 6, 4, 3, 2, 6, 4, 5, 5, 5, 3, 3, 4, 1, 2, 1, 6, 4, 5, 1, 2, 6, 5, 2, 1, 2, 4, 1, 1, 4, 2, 1, 5, 4, 5, 2, 4, 3, 1, 2, 2, 3, 3, 1, 5, 3, 6, 5, 6, 1, 3, 2, 3, 3, 6, 5, 3, 1, 3}
Sequence(CountIf[x ≟ k, rolls], k, 1, 6) → frequencies, {0, 0, 0, 0, 0, 0}
Sequence(1, 6) → labels
BarChart(labels, frequencies) → a
If(Max[frequencies] < 10, 11, (Max[frequencies] * 1.15)) → max
Sequence(sumlist(k), k, 91, 100) → last10, {6, 4, 3, 1, 6, 4, 4, 5, 6, 4}
BarChart(labels, frequencies) → b

绘制一个六面骰子的投掷模拟图。首先，生成100次随机投掷结果，然后统计每个数字出现的次数。接着，创建一个柱状图显示这些频率。最后，显示最近10次投掷的结果。

以上提示语为根据原始绘图命令整理而来，仅供参考。