Drunk Praise

Generates praise with praise::praise(), then repeats some words, and permutes them all.

Usage

drunk(
  repeat_words = 1,
  repeat_times = 2,
  template = "You are ${adverb} ${adjective}!"
)

Arguments

repeat_words

int scalar, the number of words that get repeated

repeat_times

an integer-valued (non-negative) vector. If length(repeat_times) is repeat_words, gives the number of times each repeated word appears. If length 1, each repeated word appears that number of times. Otherwise, throws an error (see rep()).

template

character scalar, template for the (non-swapped) praise

Examples

drunk()
#> [1] "unique! are quietly You unique!"
drunk(2, 2:3)
#> [1] "bravely are bravely astounding! astounding! You astounding!"
drunk(2, 2, "You are ${creating} a ${adverb} ${adjective} ${rpackage}")
#> [1] "are inventing You elegant software warmly software a a"