Wprowadzenie do kursu

Zagadki prawdopodobieństwa w R

Peter Chi

Assistant Professor of Statistics

Przegląd kursu

  • Rozdział 1: Klasyka

    • Problem urodzin
    • Problem Monty'ego Halla

  • Rozdział 2: Gry w kości

    • Yahtzee
    • Osadnicy z Catanu
    • Craps

  • Rozdział 3: Inspiracje z sieci

    • Kombinacje kodu iPhone
    • Anulowanie błędu znaku
    • Rozkład trójmianu

  • Rozdział 4: Gry w pokera

    • Karty w Texas Hold'em
    • Kolejne wypłaty w WSOP
    • Model pokera von Neumanna
Zagadki prawdopodobieństwa w R

Kombinatoryka

  • 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
Zagadki prawdopodobieństwa w R

Symulacje

  • Losowanie obiektu - sample()
  • Symulacja rzutu monetą - rbinom()
  • Powtarzanie procesu
    • replicate()
    • Pętle: for, while
  • Ustawienie ziarna - set.seed()
Zagadki prawdopodobieństwa w R

Pętle for – szczegóły

for(i in 1:10){
  sum(sample(x = c(1,2,3,4,5,6), size = 2, replace = TRUE))
}

Zapisywanie wyników:

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
Zagadki prawdopodobieństwa w R

Funkcje

my_function <- function(n){
  answer <- n^3
  return(answer)
}

 

my_function(10)

1000
Zagadki prawdopodobieństwa w R

Czas na ćwiczenia!

Zagadki prawdopodobieństwa w R

Preparing Video For Download...