R 样本的概率为0？

一个瓮里有10个球，其中3个是白色的，4个是蓝色的，3个是黑色的。从瓮中随机抽取三个球。我使用以下代码将其分配给示例空间：

require(prob)
L<-rep(c("White","Blue","Black"),times=c(3,4,3))
M<-urnsamples(L,size=3,replace=FALSE, ordered=FALSE)
N<-probspace(M)

但是，当我试图计算绘制两个白色球和一个黑色球的概率，或者绘制每种颜色的一个球的概率时，我得到的回答是0：

> Prob(N,isrep(N,"White","Blue","Black",1,1,1))
[1] 0
> Prob(N,isrep(N,"White","Black",2,1))
[1] 0

---

代码有问题吗？因为逻辑上答案分别是0.3和0.75。如果它适用于第一种情况，为什么不适用于第二种和第三种情况，因为这三种情况都应该具有相同的代码

您希望能够指定特定颜色在结果中出现的次数

请记住，我们在某种程度上受到您设定的样本量的限制，即3。我们可以使用

noorder

以易于阅读的格式查看3种颜色的可能组合及其概率列表：

noorder(N)

从这个表中你可以看到，例如，有3个灰灰色的球的概率是0.008333333

如果我们想找出样本中有2个“鬼白色”球的概率：

Q <- noorder(N)

Prob(Q,isin(Q,c("Ghost White", "Ghost White")))

[1] 0.1833333

让我们扩大样本量，进行更多实验

M<-urnsamples(L,size=7,replace=FALSE, ordered=FALSE)
N<-probspace(M)
Q <- noorder(N)

[1] 0.8083333

3“灰灰色”和2“鬼白色”的概率为：

[1] 0.1833333

---

您希望能够指定特定颜色在结果中出现的次数

请记住，我们在某种程度上受到您设定的样本量的限制，即3。我们可以使用

noorder

以易于阅读的格式查看3种颜色的可能组合及其概率列表：

noorder(N)

从这个表中你可以看到，例如，有3个灰灰色的球的概率是0.008333333

如果我们想找出样本中有2个“鬼白色”球的概率：

Q <- noorder(N)

Prob(Q,isin(Q,c("Ghost White", "Ghost White")))

[1] 0.1833333

让我们扩大样本量，进行更多实验

M<-urnsamples(L,size=7,replace=FALSE, ordered=FALSE)
N<-probspace(M)
Q <- noorder(N)

[1] 0.8083333

3“灰灰色”和2“鬼白色”的概率为：

[1] 0.1833333

---

urnsamples

和

probspace

函数来自哪里？如果您使用的是非base R包，请确保在问题中显式地命名它们。我使用prob包来使用这些命令。对不起，我是新手。对于非基本包，如果您的意思是使用内置的r包，那么不是。

urnsamples

和

probspace

函数来自哪里？如果您使用的是非base R包，请确保在问题中显式地命名它们。我使用prob包来使用这些命令。对不起，我是新手。对于非基本包，如果您的意思是使用内置的r包，则不是。isin命令有帮助，但我无法选择要取出的每种颜色的球的数量。@NandhaKumar哦，您的意思是如果您想要2个鬼白色和1个灰灰色？让我调查一下，没错。我一直在阅读，我发现我们需要使用choose命令或nsamp（n，k）命令，然后将得到的答案相乘。但是，一定有办法使用上述方法吗？@NandhaKumar很乐意帮忙！如果有帮助，请随意将其标记为解决方案：）如果您使用

rep（c（“鬼白色”、“灰灰色”），each=c（2,3））

isin命令会有所帮助，但我无法选择要取出的每种颜色的球数。@NandhaKumar哦，您的意思是如果您想要2个鬼白色和1个灰灰色？让我调查一下，没错。我一直在阅读，我发现我们需要使用choose命令或nsamp（n，k）命令，然后将得到的答案相乘。但是，一定有办法使用上述方法吗？@NandhaKumar很乐意帮忙！如果有帮助，请随意将其标记为解决方案：）如果您使用

rep（c（“鬼白色”、“灰灰色”），each=c（2,3））

Prob(Q,isin(Q,c("Ash Gray", rep(c("Ghost White", "Ash Gray"),1))))

> Prob(Q,isin(Q,c("Ash Gray", rep(c("Ghost White", "Ash Gray"),2)))