getRandomNames: #' @export get_random_name = function(retry) left = left()...

View source: R/randomNames.R

getRandomNamesR Documentation

#' @export get_random_name = function(retry) left = left() right = right() name = paste0(left[sample(x = length(left), size = 1)],'_',right[sample(x = length(right), size = 1)]) if(name == 'boring_wozniak') get_random_name(retry) if(retry>0) name = paste0(name,sample(10,1)) return(name)

Description

#' @export get_random_name = function(retry) left = left() right = right() name = paste0(left[sample(x = length(left), size = 1)],'_',right[sample(x = length(right), size = 1)]) if(name == 'boring_wozniak') get_random_name(retry) if(retry>0) name = paste0(name,sample(10,1)) return(name)

Usage

getRandomNames(n = 1, alliterate = FALSE)

oganm/ogbox documentation built on Feb. 18, 2024, 12:37 a.m.