Funktion für eine Runde
Nutzen wir jetzt die Funktion aus der vorherigen Aufgabe und schreiben eine übergeordnete Funktion namens evaluate_first_roll, die eine komplette Runde Craps abbildet. Wie im Beispielcode unten zu sehen, nimmt diese Funktion den ersten Wurf der schießenden Person als Eingabe und entscheidet von dort aus weiter. Die Funktionen roll_dice und roll_after_point sind bereits für dich geladen.
Diese Übung ist Teil des Kurses
Wahrscheinlichkeitsrätsel in R
Anleitung zur Übung
- Verwende den Operator
%in%, um zu prüfen, ob der Wurf eine 7 oder 11 ist, was zu einem sofortigen Gewinn führt. - Verwende den Operator
%in%, um zu prüfen, ob der Wurf eine 2, 3 oder 12 ist, was zu einer sofortigen Niederlage führt. - Wenn ein Point festgelegt wird, würfle weiter, bis entweder der Point erneut geworfen wird (Gewinn) oder eine 7 fällt (Niederlage).
Interaktive Übung
Vervollständige den Beispielcode, um diese Übung erfolgreich abzuschließen.
evaluate_first_roll <- function(roll){
# Check whether the first roll gives an immediate win
if(___){
won <- TRUE
}
# Check whether the first roll gives an immediate loss
if(___){
won <- FALSE
}
if(roll %in% c(4,5,6,8,9,10) ){
# Roll until the point or a 7 is rolled and store the win/lose outcome
won <- ___
}
return(won)
}