Попытка решить проблему в упражнении в классе (без знания кода; ожидаются некоторые подсказки)
Представьте, что вы находитесь в казино, играющем в игровой автомат, который каждый раз стоит один доллар. Вы либо теряете доллар (с вероятностью $ p $), либо выигрываете два доллара (с вероятностью $ 1 {-} p $). Поскольку вы находитесь в казино, $ p \ geq 0.5 $.
Напишите функцию, которая имитирует результат одной игры на игровом автомате, т.е. возвращает 0 или 2 с вероятностью p и 1-p соответственно.
Я написал:
slot <-function(nflips,p)
{
x<-runif(nflips)
ifelse(x<=p,0,2)
}
Slot(1,0.5)
СЕЙЧАС: Предположим, вы начинаете с 10 долларов и решаете играть, пока не выиграете 20 долларов или не потеряете все свои деньги. Предположим, что р = 0,5. Напишите цикл while для симуляции этого процесса. В конце концов у вас будет 20 или 0 долларов. Сколько раз вы играли?
Я не могу найти код, в котором я могу использовать 2 условия в операторе while ($ = 0 и $ = 20)