Description Usage Arguments Value Author(s) Examples
Sees if you have a straight flush, and if so, finds the strength of your hand. Used by handeval().
1 | strflsh1(x, y)
|
x |
|
y |
returns the highest card of your straight flush if you have one, or 0 otherwise.
Frederic Paik Schoenberg
1 2 3 4 5 6 7 8 9 10 11 12 13 | ##---- Should be DIRECTLY executable !! ----
##-- ==> Define data, use random,
##-- or do help(data=index) for the standard data sets.
## The function is currently defined as
function(x,y){
a1 = mycount1(y)
if(max(a1$ct)<4.5) return(0)
a2 = c(1:length(a1$ct))[a1$ct > 4.5]
a3 = a1$v[a2] ## this is the suit
a4 = sort(x[y == a3],decreasing=T)
straight1(a4)
} ## end of strflush1
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.