evenBreak {evenBreak} | R Documentation |
evenBreak
Description
compute the probability of a given distribution of a single suit across 4 hands
Usage
evenBreak(D4,n1,n2,n3,PERM)
Arguments
D4 |
one quarter of the size of the deck, normally = 13 |
n1 |
the number of cards in the suit in the hands of player 1 |
n2 |
the number of cards in the suit in the hands of player 2 |
n3 |
the number of cards in the suit in the hands of player 3 |
PERM |
the number of permutations |
Value
returns the probability of a given distribution of a single suit across 4 hands
Author(s)
Barry Zeeberg
Examples
n1<-3
n2<-3
n3<-3
n4<-13-(n1+n2+n3)
PERM<-length(unique(combinat::permn(c(n1,n2,n3,n4))))
PERM
evenBreak(13,n1,n2,n3,1)*length(unique(combinat::permn(c(n1,n2,n3,n4))))
[Package evenBreak version 1.0 Index]