## MAKE TEAMS:,

x = scan("names.txt",what="character",sep="\n")
n = length(x)
name1 = as.character(1:floor(n/2))

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

teams()

Project teams: 

 team 1 Ameer Alameddin .  Cassandra Tai . 
 team 2 Antoine Rajkovic .  Madeleine Farrington . 
 team 3 Asher Kraut .  Adam Tilford . 
 team 4 Johnson Nguyen .  Joshua Feldman . 
 team 5 Max Du .  Amanda Johnson . 
 team 6 Lauren Mendoza .  Jay Lu . 
 team 7 Nam Nguyen .  Sarah Wax . 
 team 8 Leah Robbie .  Jongho Weon . 
 team 9 Siddharth Joshi .  Whitney Wood . 

http://www.stat.ucla.edu/~frederic/19/F17 

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

tommy = function (numattable1, crds1, board1, round1, currentbet, mychips1, 
    pot1, roundbets, blinds1, chips1, ind1, dealer1, tablesleft) 
{
    a1 = 0
    if (crds1[1, 1] == crds1[2, 1]) 
        a1 = mychips1
    a1
}