找回密码
 欢迎注册
查看: 191|回复: 1

[分享] 另一个有点反直觉的抛硬币问题

[复制链接]
发表于 2024-4-19 16:02:35 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?欢迎注册

×
抛一枚理想的硬币100次,记录正(H)和反(T)的出现顺序。对于每个HH(连续的正),小明得一分;对于每个T_T (即两个中间隔了一个的反+反,中间那一次是正或反都无所谓)小红得一分。得分高者胜出。

问,谁的赢面更大?

比如前10次的结果是 HHHTHTHTTT,

小明会得 2 分(得分点是从1和2号位置开始的两组HH),小红会得到 3 分(从4、6和 8号位置开始的T_T)。


这还有个投票~https://weibo.com/2703634217/OarM9AuLV

毋因群疑而阻独见  毋任己意而废人言
毋私小惠而伤大体  毋借公论以快私情
发表于 2024-4-23 15:02:02 | 显示全部楼层
本帖最后由 BeerRabbit 于 2024-4-23 21:22 编辑
  1. WinCount[n_] := Module[{a = RandomInteger[{0, 1}, n], x, y},
  2.    x = a[[# ;; # + 1]] & /@ Range[n - 1] // Count[#, {1, 1}] &;
  3.    y = a[[# ;; # + 2]] & /@ Range[n - 2] // Count[#, {0, _, 0}] &;
  4.    If[x > y, {1, 0, 0}, If[x < y, {0, 0, 1}, {0, 1, 0}]]];

  5. T = 1000000;
  6. (Table[WinCount[100], T] // Total)/(T 1.) // AbsoluteTiming
复制代码


结果(机器有点烂):
{313.627, {0.491272, 0.037728, 0.471}}
小明赢面大一点
毋因群疑而阻独见  毋任己意而废人言
毋私小惠而伤大体  毋借公论以快私情
您需要登录后才可以回帖 登录 | 欢迎注册

本版积分规则

小黑屋|手机版|数学研发网 ( 苏ICP备07505100号 )

GMT+8, 2024-5-2 15:11 , Processed in 1.587544 second(s), 16 queries .

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表