Вступ до курсу
Ймовірнісні головоломки в R
Peter Chi
Assistant Professor of Statistics
Огляд курсу
Розділ 1: Класика
- Задача про день народження
- Монті Голл
Розділ 2: Ігри з кубиками
- Ятзі
- Колонізатори Катан
- Крэпс
Розділ 3: Натхненні інтернетом
- Комбінації паролів iPhone
- Скасування знакової помилки
- Розкладення квадратного тричлена
Розділ 4: Покерні ігри
- Початкові карти в Texas Hold'em
- Поспільні призові входження на WSOP
- Модель фон Неймана для покеру
Комбінаторика
factorial(n)factorial(3)$= 3! = 3 \times 2 \times 1$
factorial(3)
6
choose(n,k)choose(5,3)$ = {5 \choose 3} = \frac{5!}{3! \times (5-3)!} $
choose(5,3)
10
Симуляції
- Вибрати випадковий об'єкт —
sample() - Зімітувати підкидання монети —
rbinom() - Повторити процес
replicate()- Цикли:
for,while
- Встановити зерно —
set.seed()
Докладніше про цикл for
for(i in 1:10){
sum(sample(x = c(1,2,3,4,5,6), size = 2, replace = TRUE))
}
Збереження результатів:
rolls <- rep(NA, 10) for(i in 1:10){ rolls[i] <- sum(sample(x = c(1,2,3,4,5,6), size = 2, replace = TRUE)) }rolls
3 6 3 9 9 3 6 11 9 10
Функції
my_function <- function(n){
answer <- n^3
return(answer)
}
my_function(10)
1000
Давайте потренуємось!
Ймовірнісні головоломки в R
