commit a0755d34805fa040443c92bea6c2ce77d6ebefb6 Author: boB Rudis Date: Sat Mar 25 22:18:13 2017 -0400 initial commit diff --git a/.Rbuildignore b/.Rbuildignore new file mode 100644 index 0000000..1c60b19 --- /dev/null +++ b/.Rbuildignore @@ -0,0 +1,10 @@ +^.*\.Rproj$ +^\.Rproj\.user$ +^\.travis\.yml$ +^README\.*Rmd$ +^README\.*html$ +^NOTES\.*Rmd$ +^NOTES\.*html$ +^\.codecov\.yml$ +^README_files$ +^doc$ diff --git a/.codecov.yml b/.codecov.yml new file mode 100644 index 0000000..69cb760 --- /dev/null +++ b/.codecov.yml @@ -0,0 +1 @@ +comment: false diff --git a/.gitignore b/.gitignore new file mode 100644 index 0000000..cce1f17 --- /dev/null +++ b/.gitignore @@ -0,0 +1,8 @@ +.DS_Store +.Rproj.user +.Rhistory +.RData +.Rproj +src/*.o +src/*.so +src/*.dll diff --git a/.travis.yml b/.travis.yml new file mode 100644 index 0000000..76d9586 --- /dev/null +++ b/.travis.yml @@ -0,0 +1,31 @@ +language: r + +warnings_are_errors: true + +sudo: required + +cache: packages + +r: + - oldrel + - release + - devel + +apt_packages: + - libv8-dev + - xclip + +env: + global: + - CRAN: http://cran.rstudio.com + +after_success: + - Rscript -e 'covr::codecov()' + +notifications: + email: + - bob@rud.is + irc: + channels: + - "104.236.112.222#builds" + nick: travisci diff --git a/DESCRIPTION b/DESCRIPTION new file mode 100644 index 0000000..ce8ff3c --- /dev/null +++ b/DESCRIPTION @@ -0,0 +1,17 @@ +Package: bismer +Type: Package +Title: Shakespearean Insult Generator +Version: 0.1.0 +Date: 2017-03-24 +Author: Bob Rudis (bob@rud.is) +Maintainer: Bob Rudis +Description: Shakespearean insult generator +URL: https://github.com/hrbrmstr/bismer +BugReports: https://github.com/hrbrmstr/bismer/issues +License: AGPL +Suggests: + testthat, covr +Depends: + R (>= 3.2.0) +Imports: tibble +RoxygenNote: 6.0.1 diff --git a/NAMESPACE b/NAMESPACE new file mode 100644 index 0000000..772f4a6 --- /dev/null +++ b/NAMESPACE @@ -0,0 +1,4 @@ +# Generated by roxygen2: do not edit by hand + +export(insult) +import(tibble) diff --git a/NEWS.md b/NEWS.md new file mode 100644 index 0000000..9b4679b --- /dev/null +++ b/NEWS.md @@ -0,0 +1,2 @@ +0.1.0 +* Initial release diff --git a/R/bismer-package.R b/R/bismer-package.R new file mode 100644 index 0000000..167287c --- /dev/null +++ b/R/bismer-package.R @@ -0,0 +1,7 @@ +#' Generat a random Shakespearean insult +#' +#' @name bismer +#' @docType package +#' @author Bob Rudis (bob@@rud.is) +#' @import tibble +NULL diff --git a/R/bismer.r b/R/bismer.r new file mode 100644 index 0000000..5a8c689 --- /dev/null +++ b/R/bismer.r @@ -0,0 +1,41 @@ +structure(list(c1 = c("artless", "bawdy", "beslubbering", "bootless", +"churlish", "cockered", "clouted", "craven", "currish", "dankish", +"dissembling", "droning", "errant", "fawning", "fobbing", "froward", +"frothy", "gleeking", "goatish", "gorbellied", "impertinent", +"infectious", "jarring", "loggerheaded", "lumpish", "mannering", +"mangled", "mewling", "paunchy", "pribbling", "puking", "puny", +"qualling", "rank", "reeky", "roguish", "ruttish", "saucy", "spleeny", +"spongy", "surly", "tottering", "unmuzzled", "vain", "venomed", +"villainous", "warped", "wayward", "weedy", "yeasty"), c2 = c("base-court", +"bat-fouling", "beef-witted", "beetle-headed", "boil-brained", +"clapper-clawed", "clay-brained", "common-kissing", "crook-pared", +"dismal-dreaning", "dizzy-eyed", "doghearted", "dread-bolted", +"earth-vexing", "elf-skinned", "fat-kidneyed", "fen-sucked", +"flap-mouthed", "fly-bitten", "folly-fallen", "fool-born", "full-gorged", +"guts-griping", "half-faced", "hasty-witted", "hedge-born", "hell-hated", +"idle-headed", "ill-breeding", "ill-nurtured", "knotty-pated", +"milk-livered", "motley-minded", "onion-eyed", "plume-plucked", +"pottle-deep", "pox-marked", "reeling-ripe", "rough-hewn", "rude-growing", +"rump-fed", "shard-borne", "sheep-biting", "spur-galled", "swag-bellied", +"tardy-gaited", "tickle-brained", "toad-spotted", "unchin-snouted", +"weather-bitten"), c3 = c("apple-john", "baggage", "barnacle", +"bladder", "boar-pig", "bugbear", "bum-bailey", "canker-blossom", +"clack-dish", "clotpole", "ooxoomb", "codpiece", "death-token", +"dewberry", "flap-dragon", "flax-wench", "flirt-gill", "foot-licker", +"fustilarian", "giglet", "gudgeon", "haggard", "harpy", "hedge-pig", +"horn-beast", "hugger-mugger", "joithead", "lewdster", "lout", +"maggot-pie", "malt-worm", "mammet", "measle", "minnow", "miscreant", +"moldwarp", "mumble-news", "nut-hook", "pigeon-egg", "pignut", +"puttock", "pumpion", "ratsbane", "scut", "skainsmate", "strumpet", +"varlot", "vassal", "whey-face", "wagtail")), class = c("tbl_df", +"tbl", "data.frame"), row.names = c(NA, -50L), .Names = c("c1", +"c2", "c3")) -> insults + +#' Generate a random Shakespearean insult +#' @export +insult <- function() { + sprintf("%s %s %s", + insults$c1[sample(length(insults$c1), 1)], + insults$c2[sample(length(insults$c2), 1)], + insults$c3[sample(length(insults$c3), 1)]) +} \ No newline at end of file diff --git a/README.Rmd b/README.Rmd new file mode 100644 index 0000000..c686bb5 --- /dev/null +++ b/README.Rmd @@ -0,0 +1,42 @@ +--- +output: rmarkdown::github_document +--- + +`bismer` : Generate Shakespearean insults + +The following functions are implemented: + +- `insult`: Generate a Shakespearean insult + +### Installation + +```{r eval=FALSE} +devtools::install_github("hrbrmstr/bismer") +``` + +```{r message=FALSE, warning=FALSE, error=FALSE, include=FALSE} +options(width=120) +``` + +### Usage + +```{r message=FALSE, warning=FALSE, error=FALSE} +library(bismer) + +# current verison +packageVersion("bismer") + +purrr::walk(1:10, ~print(insult())) +``` + +### Test Results + +```{r message=FALSE, warning=FALSE, error=FALSE} +library(bismer) +library(testthat) + +date() + +test_dir("tests/") +``` + diff --git a/README.md b/README.md new file mode 100644 index 0000000..021c4a8 --- /dev/null +++ b/README.md @@ -0,0 +1,58 @@ + +`bismer` : Generate Shakespearean insults + +The following functions are implemented: + +- `insult`: Generate a Shakespearean insult + +### Installation + +``` r +devtools::install_github("hrbrmstr/bismer") +``` + +### Usage + +``` r +library(bismer) + +# current verison +packageVersion("bismer") +``` + + ## [1] '0.1.0' + +``` r +purrr::walk(1:10, ~print(insult())) +``` + + ## [1] "venomed beetle-headed death-token" + ## [1] "impertinent clapper-clawed mumble-news" + ## [1] "lumpish tardy-gaited hugger-mugger" + ## [1] "mangled fool-born whey-face" + ## [1] "beslubbering reeling-ripe ratsbane" + ## [1] "mangled tickle-brained foot-licker" + ## [1] "puking dismal-dreaning strumpet" + ## [1] "dankish half-faced pumpion" + ## [1] "puny pox-marked clotpole" + ## [1] "yeasty dismal-dreaning vassal" + +### Test Results + +``` r +library(bismer) +library(testthat) + +date() +``` + + ## [1] "Sat Mar 25 22:17:57 2017" + +``` r +test_dir("tests/") +``` + + ## testthat results ======================================================================================================== + ## OK: 0 SKIPPED: 0 FAILED: 0 + ## + ## DONE =================================================================================================================== diff --git a/bismer.Rproj b/bismer.Rproj new file mode 100644 index 0000000..446d9e1 --- /dev/null +++ b/bismer.Rproj @@ -0,0 +1,21 @@ +Version: 1.0 + +RestoreWorkspace: Default +SaveWorkspace: Default +AlwaysSaveHistory: Default + +EnableCodeIndexing: Yes +UseSpacesForTab: Yes +NumSpacesForTab: 2 +Encoding: UTF-8 + +RnwWeave: Sweave +LaTeX: pdfLaTeX + +StripTrailingWhitespace: Yes + +BuildType: Package +PackageUseDevtools: Yes +PackageInstallArgs: --no-multiarch --with-keep.source +PackageBuildArgs: --resave-data +PackageRoxygenize: rd,collate,namespace diff --git a/man/bismer.Rd b/man/bismer.Rd new file mode 100644 index 0000000..5a0d3a5 --- /dev/null +++ b/man/bismer.Rd @@ -0,0 +1,13 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/bismer-package.R +\docType{package} +\name{bismer} +\alias{bismer} +\alias{bismer-package} +\title{Generat a random Shakespearean insult} +\description{ +Generat a random Shakespearean insult +} +\author{ +Bob Rudis (bob@rud.is) +} diff --git a/man/insult.Rd b/man/insult.Rd new file mode 100644 index 0000000..7b08b61 --- /dev/null +++ b/man/insult.Rd @@ -0,0 +1,11 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/bismer.r +\name{insult} +\alias{insult} +\title{Generate a random Shakespearean insult} +\usage{ +insult() +} +\description{ +Generate a random Shakespearean insult +} diff --git a/tests/test-all.R b/tests/test-all.R new file mode 100644 index 0000000..da42d4d --- /dev/null +++ b/tests/test-all.R @@ -0,0 +1,2 @@ +library(testthat) +test_check("bismer") diff --git a/tests/testthat/test-bismer.R b/tests/testthat/test-bismer.R new file mode 100644 index 0000000..ab6f62f --- /dev/null +++ b/tests/testthat/test-bismer.R @@ -0,0 +1,6 @@ +context("basic functionality") +test_that("we can do something", { + + #expect_that(some_function(), is_a("data.frame")) + +})