Funktion zur Simulation einer Runde mit Setzen
Schreiben wir nun eine Funktion, die eine Runde im von-Neumann-Modell simuliert und dabei Setzen berücksichtigt.
Spieler B sieht seinen Wert und entscheidet, ob er $1 setzt oder nicht. Wenn gesetzt wird, vergleichen die beiden Spieler ihre Werte, und der höhere Wert gewinnt. Beachte: Wenn Spieler B setzt und gewinnt, ist das Ergebnis plus 1; wenn er setzt und verliert, ist das Ergebnis minus 1. Wenn Spieler B nicht setzt, gewinnt oder verliert keiner der beiden Geld.
Hier nehmen wir an, dass Spieler B eine feste Strategie hat: Liegt sein Wert über einem bestimmten Schwellenwert, setzt er. Dieser Schwellenwert, bet_cutoff, ist das Argument der Funktion.
Diese Übung ist Teil des Kurses
Wahrscheinlichkeitsrätsel in R
Anleitung zur Übung
- Bestimme, ob Spieler B sich fürs Setzen entscheidet.
- Falls er setzt, gib das Ergebnis der Wette mit der Funktion
ifelsezurück.
Interaktive Übung
Vervollständige den Beispielcode, um diese Übung erfolgreich abzuschließen.
one_round <- function(bet_cutoff){
a <- runif(n = 1)
b <- runif(n = 1)
# Fill in betting condition
if(___){
# Return result of bet
return(___)
} else {
return(0)
}
}