WOLFRAM

Wolfram 语言与系统参考资料中心

数据包的传送

在有噪声的通道里传输由 个符号组成的字符串的数据包. 每个符号传输错误的概率为0.0001. 求使得有错传输（至少一个符号错误）的概率小于 0.001 的最大的 .

Wolfram Language code: transmissionProcess = BinomialProcess[10 ^ -4];
传输中出现错误的概率：
Wolfram Language code: prob = Probability[x > 0, xtransmissionProcess[n]]
Wolfram Language code: ListLogPlot[Transpose@Table[{prob, 10 ^ (-3)}, {n, 0, 15}], Joined -> True, Filling -> Axis]
求使得有错传输的概率小于10-3的最大的 ：
Wolfram Language code: Maximize[{n, prob <= 10 ^ -3 && n∈Integers && 5 <= n <= 15}, n]