怎么用Mathematica处理概率问题?

 时间:2026-02-14 04:46:23

1、给出一个具体的例子:

小乓做射击试验,并每隔10次就统计一下命中10环的次数,数据结构如下所示:

a = {10, 20, 30, 40, 50, 60, 70, 80, 90, 100};

b = {3, 7, 9, 11, 16, 18, 21, 23, 27, 30};

b表示每个10次累计的10环命中次数。

怎么用Mathematica处理概率问题?

2、分别绘制a和b的散点图:

ListLinePlot[{a, b}, PlotStyle -> {Green, Blue}]

怎么用Mathematica处理概率问题?

3、再画出命中10环的概率图:

ListLinePlot[{a, b, b/a}, PlotStyle -> {Green, Blue, Red}]

这说明小乓命中10的概率,基本稳定在30%。

怎么用Mathematica处理概率问题?

4、用线性拟合的方法,来拟合试验数据:

c = {a, b} // Transpose

d = Fit[c, {1, x}, x]

然后画出拟合的图像:

Show[ListLinePlot[c, PlotStyle -> Green], 

 Plot[d, {x, 0, 100}, PlotStyle -> Blue]

可以看到,拟合效果非常好。

怎么用Mathematica处理概率问题?

5、用二次函数来拟合试验数据:

d = Fit[c, {1, x, x^2}, x];

画出的图像如下,没有明显改变。

怎么用Mathematica处理概率问题?

6、用七次函数来拟合数据:

d = Fit[c, Array[x^# &, 7], x];

怎么用Mathematica处理概率问题?

7、用10次函数来拟合数据,就出现了过拟合现象——也就是过犹不及。

怎么用Mathematica处理概率问题?

  • 过二硫酸铵与碘化钾反应是吸热还是放热
  • 利用MeGUI转换mkv格式为mp4
  • 怎么安装creative cloud?
  • Adobe Audition CS6对音乐的左右声道静音
  • 怎样利用Matlab求定积分和不定积分
  • 热门搜索
    苹果手机怎么查真伪 做馅饼的面怎么和 煲耳机方法 美白的方法 怎么能瘦腿 回力轮胎怎么样 魔方还原方法 天然气灶打不着火原因和处理方法 怎么卸载ie浏览器 a的平方怎么打