Funkce pro pokračování házení po stanovení pointu
Teď napíšeme funkci, která řídí všechna házení po stanovení pointu. Ta by měla pokračovat v házení, dokud nepadne znovu point nebo sedmička. Jakmile k tomu dojde, má se zastavit a vrátit informaci, jestli jde o výhru, nebo prohru.
Všimni si, že i v této funkci budeme opět volat funkci roll_dice, kterou jsme si definovali dříve.
Toto cvičení je součástí kurzu
Probability Puzzles in R
Pokyny k cvičení
- Doplň podmínky ve smyčce while tak, aby se pokračovalo v házení, dokud nepadne sedmička nebo point.
- Doplň podmínku, která zkontroluje, jestli poslední hod znamená výhru.
Interaktivní cvičení na vyzkoušení si v praxi
Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.
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)
}