베팅이 포함된 한 판 시뮬레이션 함수
이제 베팅을 포함한 von Neumann 모델에서 한 판을 시뮬레이션하는 함수를 작성해 보세요.
Player B는 자신의 값을 확인한 뒤 $1을 베팅할지 말지 결정합니다. 베팅하기로 했다면 두 플레이어의 값을 비교해 더 큰 값이 승리합니다. Player B가 베팅해서 이기면 결과는 +1, 베팅해서 지면 결과는 -1입니다. Player B가 베팅하지 않으면 어느 쪽도 돈을 잃거나 벌지 않습니다.
여기서는 Player B가 고정된 전략을 갖는다고 가정합니다. 자신의 값이 어떤 기준값을 넘으면 베팅합니다. 이 기준값 bet_cutoff는 함수의 인수로 받습니다.
이 연습은 강의의 일부입니다
R로 풀어보는 확률 퍼즐
연습 안내
- Player B가 베팅할지 여부를 결정하세요.
- 베팅한다면,
ifelse함수를 사용해 베팅 결과를 반환하세요.
실습형 인터랙티브 연습
이 예제를 이 샘플 코드를 완성하여 풀어보세요.
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)
}
}