Introductie van de cursus

Kanspuzzels in R

Peter Chi

Assistant Professor of Statistics

Cursusoverzicht

  • Hoofdstuk 1: De klassiekers

    • Het verjaardagsprobleem
    • Monty Hall

  • Hoofdstuk 2: Spellen met dobbelstenen

    • Yahtzee
    • Catan
    • Craps

  • Hoofdstuk 3: Geïnspireerd door het web

    • iPhone-toegangscodecombinaties
    • Wegvallen van tekenfouten
    • Ontbinden van een kwadratische vergelijking

  • Hoofdstuk 4: Pokerspellen

    • Texas Hold'em starthanden
    • Opeenvolgende cashes in de WSOP
    • von Neumann-model van poker
Kanspuzzels in R

Combinatoriek

  • 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
Kanspuzzels in R

Simulaties

  • Kies willekeurig een object - sample()
  • Simuleer een muntworp - rbinom()
  • Herhaal een proces
    • replicate()
    • Lussen: for, while
  • Stel een seed in - set.seed()
Kanspuzzels in R

Meer over for-lussen

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

Resultaten opslaan:

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
Kanspuzzels in R

Functies

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

 

my_function(10)

1000
Kanspuzzels in R

Laten we oefenen!

Kanspuzzels in R

Preparing Video For Download...