Produces a single compliment that is deterministic for a given date: calling compliment_of_the_day() more than once for the same day returns the same compliment. Internally this seeds the random number generator with set.seed(), then restores whatever RNG state existed beforehand, so it will not disturb reproducibility elsewhere in your session (e.g. a set.seed() you called earlier).

compliment_of_the_day(
  date = Sys.Date(),
  weirdness = 0,
  mood = "sincere",
  profanity = "none",
  shakespearean = FALSE
)

Arguments

date

A Date, or a string coercible to one via as.Date(). Defaults to today's date.

weirdness, mood, profanity, shakespearean

See compliment().

Value

A single compliment string.

Examples

compliment_of_the_day()
#> [1] "Your spirit is nothing short of creative."
compliment_of_the_day("2026-01-01")
#> [1] "You have a remarkably insightful perspective."
compliment_of_the_day(Sys.Date(), weirdness = 1)
#> [1] "Scientists remain baffled by your tectonically unstable toaster intuition."
compliment_of_the_day(mood = "grumpy", shakespearean = TRUE)
#> [1] "Thy prattle is unburdensome -- by thy standards, at least."