Singularize a Word in English

Usage

singularize(x)

Arguments

x: vector of words to make singular

Value

modified character vector of singularized words

Examples

singularize('test')
#> [1] "test"
singularize(c("boats", "houses", "cats", "rivers"))
#> [1] "boat"  "house" "cat"   "river"
pluralize(singularize(c("boats", "houses", "cats", "rivers")))
#> [1] "boats"  "houses" "cats"   "rivers"
singularize(c("buses", "wishes", "pitches", "boxexs"))
#> [1] "bus"   "wish"  "pitch" "boxex"
pluralize(singularize(c("buses", "wishes", "pitches", "boxexs")))
#> [1] "buses"   "wishes"  "pitches" "boxexes"
singularize(c("pennies", "spies", "babies", "cities", "daisies"))
#> [1] "penny"  "spy"    "baby"   "city"   "daisie"
pluralize(singularize(c("pennies", "spies", "babies", "cities", "daisies")))
#> [1] "pennies" "spies"   "babies"  "cities"  "daisies"
singularize(c("sheep", "fish", "deer", "species", "aircraft"))
#> [1] "sheep"    "fish"     "deer"     "specie"   "aircraft"
pluralize(singularize(c("sheep", "fish", "deer", "species", "aircraft")))
#> [1] "sheep"    "fish"     "deer"     "species"  "aircraft"