Skip to contents

Appeals Court Simulation

Source: R/courtSim.R
courtSim.Rd

In this version all five judges vote independently.

Usage

courtSim(reps = 10000,
                seed = NULL,
                table = FALSE,
                probs = c(0.95, 0.94, 0.90, 0.90, 0.80))

Arguments

reps

number of simulations to perform

seed

The user may provide a seed-value for random-number generation.

table

Does the user want a table of the results?

probs

Chance for each judge to make the right decision on any given case.

Value

side effects

Author

Homer White homerhanumat@gmail.com

Examples

courtSim(seed = 3030)
#> The proportion of times the court was correct was 0.9935.