parameters <- Parameters()
# alternatively and equiavelently
draw_margin <-DrawMargin(draw_probability = 0.10, beta = 25 / 6, total_players = 2)
parameters <- Parameters(beta = 25 / 6, epsilon = draw_margin, gamma = 25 / 300)
Run the code above in your browser using DataLab