Description Usage Arguments Value Author(s) Examples

Sees if you have 3 of a kind, and if so, finds the strength of your hand. Used by handeval().

1 | ```
trip1(x)
``` |

`x` |

Returns 225 * your triple + 15 * your next highest card + your next highest card if you have 3 of a kind, or 0 otherwise.

Frederic Paik Schoenberg

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | ```
##---- 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){
## 225*triple + 15*next + next
a1 = mycount1(x)
a2 = a1$v
a3 = a1$ct
a4 = sum(a3 > 2.5)
if(a4 < 0.5) return(0)
a5 = sort(a2[a3>2.5],decreasing=T)
a6 = sort(c(0,0,x[(x != a5[1])]),decreasing=T)
225*a5[1] + 15*a6[1] + a6[2]
} ## end of trip1
``` |

Embedding an R snippet on your website

Add the following code to your website.

For more information on customizing the embed code, read Embedding Snippets.