テキサス・ホールデム

Rで解く確率パズル

Peter Chi

Assistant Professor of Statistics Villanova University

テキサス・ホールデムのコミュニティカード

ポーカーのチップとカード

アウト: 負け手を勝ち手に改善するカード

余事象の法則: $P(A) = 1 - P(A^c)$

p_lose <- choose(10-3,2) / choose(10,2)
p_win <- 1 - p_lose
p_win

0.5333333

ベクトルでのchooseの利用:

outs <- c(0,1,2,3)

p_lose <- choose(10-outs,2) / choose(10,2)
p_win <- 1 - p_lose
p_win

0.0000000 0.2000000 0.3777778 0.5333333

$$ E(X) = \sum_{\text{all values}} x \cdot P(X=x) $$

コイン投資:

probs <- c(0.5, 0.5)
values <- c(-2, 3)
probs * values

-1  1.5

sum(probs * values)

0.5

Rで解く確率パズル