R/roulette.R

In SchoenbergA/devcreate: What the Package Does (One Line, Title Case)

Defines functions rou

Documented in rou

#' roulette
#'
#' playing roulette
#'
#'
#' @return a value between 0 and 36
#'
#'

rou <- function(){
  x <- seq(0:36)
  sample(x,1)
}