`R/calc_payouts.R`

`calc_pr_guess.Rd`

The function calculates the probability that an observer will try to guess
which rule governs the decision maker's actions. The function is meant for
internal use only. It can be printed alongside the payouts calculated using
`print_payout`

if `print_all = TRUE`

.

calc_pr_guess(expected_payout_obs, payout_obs_no_guess, deterministic)

expected_payout_obs | Vector of expected payout to the observer from guessing |
---|---|

payout_obs_no_guess | The payout to the observer from not guessing |

deterministic | A boolean equal to TRUE if we treat the decision to guess as deterministic. Defaults to TRUE. |

A vector with the probabilities that an observer will guess