Texas Hold'em

Câu đố Xác suất với R

Peter Chi

Assistant Professor of Statistics Villanova University

Bài chung trong Texas Hold'em

Biểu tượng poker

Outs: Lá giúp tay từ thua thành thắng

Quy tắc bù: $P(A) = 1 - P(A^c)$

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

0.5333333

Dùng choose với vector:

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) $$

Cược tung đồng xu:

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

-1  1.5

sum(probs * values)

0.5

Câu đố Xác suất với R