Funzione per simulare un round con puntate
Ora scriviamo una funzione che simula un round secondo il modello di von Neumann, includendo le puntate.
Il Giocatore B osserverà il proprio valore e deciderà se puntare $1 oppure no. Se decide di puntare, i due giocatori confrontano i valori e vince quello più alto. Nota che se il Giocatore B punta e vince, il risultato è più 1; se punta e perde, il risultato è meno 1. Se il Giocatore B decide di non puntare, allora nessuno dei due vince o perde denaro.
Qui assumiamo che il Giocatore B abbia una strategia fissa: se il suo valore supera una certa soglia, allora punterà. Questa soglia, bet_cutoff, sarà l'argomento della funzione.
Questo esercizio fa parte del corso
Rompicapi di probabilità in R
Istruzioni dell'esercizio
- Determina se il Giocatore B deciderà di puntare.
- Se punta, restituisci l'esito della puntata usando la funzione
ifelse.
Esercizio pratico interattivo
Prova a risolvere questo esercizio completando il codice di esempio.
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)
}
}