用蛋糕概率運行基本模擬。我如何編碼？

Question

我想運行一個基本的模擬來檢查觀察的觀察與理論。

有五個大蛋糕被選中的概率如下所示

Chocolate: 40% 
Vanilla: 40% 
Caramel: 10% 
Banana: 5% 
Coffee: 5% 

現在如果有一個相同的概率我意識到，我可以使用示例函數

即

cake <- c('choc', 'van', 'car', 'ban', 'cof') 
sample(x = cake, size = 1) 

我將如何考慮上面列出的概率？

Answer 1

cake <- c('choc', 'van', 'car', 'ban', 'cof') 
cprobs<- c(.4,.4,.1,.05,.05) 
sample(x = cake, size = 1,prob =cprobs) 

概率參數是一個包含x的概率的向量。