## MAKE TEAMS:

x = c("AndrewB","AndrewC","Makenna","Leah",
"Lucas","Jonah","Morgan","Meichen","Yuhan","Rainie") 

y = c("Preston","Emmett","Cindy","Alix","Jeffrey","Raina","Aila","Kiki") 

n = length(x)
# name1 = as.character(1:floor(n/2))
name1 = rep("0",n/2) 
for(i in 1:(n/2)) name1[i] = intToUtf8(96+i)

teams = function(){
y = x[sample(n)]
for(i in 1:length(name1)){
cat("\n", "team", name1[i], y[(2*i-1)], ". ", y[(2*i)], ". ")
}
}

teams() 

 team a Lucas .  Morgan . 
 team b Leah .  AndrewC . 
 team c Yuhan .  Jonah . 
 team d Meichen .  Rainie . 
 team e Makenna .  AndrewB . 
 team f Jeffrey .  Kiki . 
 team g Preston .  Alix . 
 team h Raina .  Emmett . 
 team i Aila .  Cindy . 

## EXAMPLES:,
install.packages("holdem")
library(holdem)
tommy
ursula
vera
william
xena 

Iveybruin = function (numattable, cards, board, round, currentbet,
mychips, pot, roundbets, blinds, chips, ind, dealer,
tablesleft) {
## all in with any 9 pair or higher, or if lower card is 10 or higher,
## or if I have less than 3 times the big blind
a = 0
if ((cards[1, 1] == cards[2, 1]) && (cards[1, 1] >= 9)) a = mychips
if (cards[2,1] > 9.5) a = mychips
if(mychips < 3*blinds) a = mychips
a
} ## end of Iveybruin