Project teams: ## 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 } ursula = function (numattable1, crds1, board1, round1, currentbet, mychips1, pot1, roundbets, blinds1, chips1, ind1, dealer1, tablesleft) { a1 = 0 if ((crds1[1, 1] == crds1[2, 1]) && (crds1[2, 1] > 8.5)) a1 = mychips1 a1 } vera = function (numattable1, crds1, board1, round1, currentbet, mychips1, pot1, roundbets, blinds1, chips1, ind1, dealer1, tablesleft) { a1 = 0 if ((crds1[1, 1] == crds1[2, 1]) || (crds1[1, 2] == crds1[2, 2]) || (crds1[2, 1] > 8.5)) a1 = mychips1 a1 } william = function (numattable1, crds1, board1, round1, currentbet, mychips1, pot1, roundbets, blinds1, chips1, ind1, dealer1, tablesleft) { a1 = 0 if (mychips1 < 3 * blinds1) a1 = mychips1 if ((crds1[1, 1] == 14) && (crds1[2, 1] == 14)) a1 = mychips1 if ((crds1[1, 1] == 10) && (crds1[2, 1] == 9)) { u1 = runif(1) if (u1 < 0.4) a1 = mychips1 if (u1 > 0.4) a1 = 0 } if (currentbet == blinds1) a1 = mychips1 if ((crds1[1, 1] == crds1[2, 1]) && (crds1[1, 1] > 11.5) && (numattable1 < 10)) a1 = mychips1 a1 }