Get a random user
Value
(character) a username with a random adjective plus a random noun combined into one string, shortened to no longer than 16 characters if longer than 16
Examples
random_user()
#> [1] "InsensibleParson"
replicate(10, random_user())
#> [1] "FamousCountdown" "UnintendedMonume" "UnattractiveDomi" "SanctionedLoathi"
#> [5] "PacedLeopard" "UntimelyEstimati" "HandheldRecurren" "WidowDenominatio"
#> [9] "OrdinateTourist" "ConsequentialAnn"