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 ===================================================================================================================