You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
1.9 KiB
1.9 KiB
bismer
: Generate Shakespearean insults
Inspired by Dr. Vicky Forster (@vickyyyf) : https://twitter.com/vickyyyf/status/846028898152431618
The following functions are implemented:
insult
: Generate a Shakespearean insult
Installation
devtools::install_github("hrbrmstr/bismer")
Usage
library(bismer)
# current verison
packageVersion("bismer")
## [1] '0.1.1'
purrr::walk(1:10, ~print(insult()))
## [1] "thou infectious beef-witted ooxoomb"
## [1] "thou puking tardy-gaited lewdster"
## [1] "thou qualling guts-griping foot-licker"
## [1] "thou venomed doghearted vassal"
## [1] "thou churlish ill-breeding foot-licker"
## [1] "thou craven clay-brained skainsmate"
## [1] "thou clouted full-gorged mumble-news"
## [1] "thou paunchy doghearted mammet"
## [1] "thou venomed dizzy-eyed malt-worm"
## [1] "thou roguish rough-hewn boar-pig"
purrr::walk(1:10, ~print(insult(thou=FALSE)))
## [1] "craven reeling-ripe gudgeon"
## [1] "impertinent milk-livered moldwarp"
## [1] "paunchy guts-griping moldwarp"
## [1] "spleeny guts-griping death-token"
## [1] "mangled fly-bitten bum-bailey"
## [1] "droning tickle-brained haggard"
## [1] "mangled clay-brained pignut"
## [1] "frothy pottle-deep horn-beast"
## [1] "fawning rump-fed scut"
## [1] "reeky hasty-witted haggard"
Test Results
library(bismer)
library(testthat)
date()
## [1] "Sun Mar 26 12:52:57 2017"
test_dir("tests/")
## testthat results ========================================================================================================
## OK: 0 SKIPPED: 0 FAILED: 0
##
## DONE ===================================================================================================================