Nothing
R/nothing1.R
In holdem: Texas Holdem Simulator
Defines functions
nothing1
Documented in
nothing1
nothing1 <-
function(x){
## 15^4*highest + 15^3*next + 225*next + 15*next + next
y = c(x,rep(0,5)) ## this is in case x has length < 5
a1 = sort(y,decreasing=TRUE)
15*15*15*15*a1[1] + 15*15*15*a1[2] + 225*a1[3] + 15*a1[4] + a1[5]
} ## end of nothing1
Try the holdem package in your browser
Any scripts or data that you put into this service are public.
holdem documentation built on May 2, 2019, 9:21 a.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Defines functions nothing1
Documented in nothing1
nothing1 <-
function(x){
## 15^4*highest + 15^3*next + 225*next + 15*next + next
y = c(x,rep(0,5)) ## this is in case x has length < 5
a1 = sort(y,decreasing=TRUE)
15*15*15*15*a1[1] + 15*15*15*a1[2] + 225*a1[3] + 15*a1[4] + a1[5]
} ## end of nothing1
Try the holdem package in your browser
Any scripts or data that you put into this service are public.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
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.