# many1: function to run many Texas Hold'em tournaments. In holdem: Texas Holdem Simulator

## Description

Runs the desired number of Texas Hold'em tournaments, and saves the results. By default, only the top 3 finishers receive payouts, and their payouts are 13, 8, and 5, respectively.

## Usage

 `1` ```many1(name1, decision1, k, winners1 = 3, payouts1 = c(13, 8, 5)) ```

## Arguments

 `name1` names of the players `decision1` codes governing the players' betting `k` number of players `winners1` number of top finishers receiving payouts in each tournament `payouts1` payouts for the top finishers

## Details

If length(name1) < k or length(decision1) < k, there will be errors.

## Author(s)

Frederic Paik Schoenberg

## References

Schoenberg, F. (2011). An Introduction to Probability with Texas Holdem Examples. Taylor and Francis, New York.

## Examples

 ``` 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21``` ```name1 = c("gravity","tommy","ursula","timemachine","vera","william","xena") decision1 = list(gravity, tommy, ursula, timemachine, vera, william, xena) z1 = many1(name1, decision1, 7) z2 = z1[[2]] barplot(z2,names.arg=name1[1:7],cex.names=.9) ## The function is currently defined as function(name1, decision1, k,winners1=3, payouts1 = c(13,8,5)){ ## runs k tournaments nplayers1 = length(name1) d1 = matrix(0,ncol=winners1,nrow=k) ## matrix of results d2 = rep(0,nplayers1) ## total pts for each player for(i in 1:k){ cat("\n\n................... TOURNAMENT NUMBER ",i,": ................... \n\n") d1[i,] = tourn1(name1, decision1) for(j in 1:winners1) d2[d1[i,j]] = d2[d1[i,j]] + payouts1[j] print(rbind(1:nplayers1,d2)) #locator(1) } list(d1,d2) } ## end of many1 ```

holdem documentation built on May 2, 2019, 9:21 a.m.