如何用R代码中已定义的p变量计算未抽到青色球的概率

这事儿其实很直观，根据概率的基本规则：所有互斥且覆盖全部可能的事件，它们的概率总和为1。既然你已经用p定义了抽到青色球的概率，那未抽到青色球的概率，直接用总概率1减去p就行。

用R代码实现的话，只需要加一行：

# 你已有的代码
cyan <- 3
magenta <- 5
yellow <- 7
p <- cyan/(cyan + magenta + yellow)

# 计算未抽到青色球的概率
p_not_cyan <- 1 - p

运行后p_not_cyan的值会是0.8，刚好对应实际情况：总共有15个球，12个不是青色，12/15=0.8。

顺便提一句，这个逻辑适用于所有“发生/不发生”的二选一互斥事件，只要知道其中一个的概率，用1减就能得到另一个的概率~

内容的提问来源于stack exchange，提问作者PaulGureghian