Funktion, die nach festgelegtem Point weiter würfelt
Lass uns die Funktion schreiben, die alle Würfe übernimmt, nachdem ein Point feststeht. Sie soll also so lange weiterwürfeln, bis entweder der Point erneut geworfen wird oder eine 7 fällt. Sobald eines von beidem passiert, soll sie stoppen und zurückmelden, ob das Ergebnis ein Gewinn oder ein Verlust ist.
Beachte, dass wir innerhalb dieser Funktion erneut die zuvor definierte Funktion roll_dice verwenden werden.
Diese Übung ist Teil des Kurses
Wahrscheinlichkeitsrätsel in R
Anleitung zur Übung
- Ergänze die Bedingungen in der while-Schleife, damit weiter gewürfelt wird, bis entweder eine 7 oder der Point fällt.
- Ergänze die Bedingung, um zu prüfen, ob der letzte Wurf zu einem Gewinn führt.
Interaktive Übung
Vervollständige den Beispielcode, um diese Übung erfolgreich abzuschließen.
roll_after_point <- function(point){
new_roll <- 0
# Roll until either a 7 or the point is rolled
while( ___ ){
new_roll <- roll_dice(2)
if(new_roll == 7){
won <- FALSE
}
# Check whether the new roll gives a win
if(___ == ___){
won <- TRUE
}
}
return(won)
}