R/create_age.R

In theoniphotopoulou/iemand: What the Package Does (One Line, Title Case)

#' Create an age for someone
#'
#' @details This is a useless function created for learning :)
#' @return age (integer)
#' @export
#'
#' @examples create_age()
#'
create_age <- function(){
  age <- sample(1:100, size=1)
  return(age)
}