Number Names.
nombre 
nombre (French) /nɔ̃bʁ/: number
nombre (Spanish) /ˈnom.bɾe/: namenombre: package to convert numbers to their names in R
nombre converts numeric vectors to character vectors of English words. You can use it to express numbers as cardinals (one, two, three) or ordinals (first, second, third), as well as numerators and denominators. nombre supports not just whole numbers, but also negatives, fractions, and ratios.
Installation
You can install the released version of nombre from CRAN with:
install.packages("nombre")
or the development version from GitHub with:
# install.packages("remotes")
remotes::install_github("rossellhayes/nombre")
Usage
nombre converts numerics into words:
nom_card(2)
#> [1] "two"
nom_card(2L)
#> [1] "two"
x <- rep(TRUE, 525600)
nom_card(length(x))
#> [1] "five hundred twenty-five thousand six hundred"
It also works for numeric vectors:
nom_card(8^(1:10))
#> [1] "eight"
#> [2] "sixty-four"
#> [3] "five hundred twelve"
#> [4] "four thousand ninety-six"
#> [5] "thirty-two thousand seven hundred sixty-eight"
#> [6] "two hundred sixty-two thousand one hundred forty-four"
#> [7] "two million ninety-seven thousand one hundred fifty-two"
#> [8] "sixteen million seven hundred seventy-seven thousand two hundred sixteen"
#> [9] "one hundred thirty-four million two hundred seventeen thousand seven hundred twenty-eight"
#> [10] "one billion seventy-three million seven hundred forty-one thousand eight hundred twenty-four"
nombre can also generate ordinals, adverbials, collectives, numerators and denominators:
nom_ord(1:5)
#> [1] "first" "second" "third" "fourth" "fifth"
nom_adv(1:5)
#> [1] "once" "twice" "three times" "four times" "five times"
nom_coll(1:5)
#> [1] "the" "both" "all three" "all four" "all five"
nom_numer(1:5)
#> [1] "one" "two" "three" "four" "five"
nom_denom(1:5)
#> [1] "whole" "half" "third" "quarter" "fifth"
nom_denom(1:5, numerator = 1:5)
#> [1] "whole" "halves" "thirds" "quarters" "fifths"
🤫 (numerators are almost always the same as cardinals)
You can also add ordinal suffixes to numerics or arbitrary number-like strings:
nom_ord(1:5, cardinal = FALSE)
#> [1] "1st" "2nd" "3rd" "4th" "5th"
nom_ord(c("n", "dozen", "umpteen", "eleventy", "one zillion"))
#> [1] "nth" "dozenth" "umpteenth" "eleventieth"
#> [5] "one-zillionth"
It can also handle less common numerics, like negatives, fractions, and ratios:
nom_card(-2)
#> [1] "negative two"
nom_card(9.75)
#> [1] "nine and three quarters"
nom_ratio(0.25)
#> [1] "one in four"
nom_ratio(3)
#> [1] "three in one"
Math with nombres
nombre implements an S3 class that seamlessly decides when to treat nombres like characters and when to treat them like numerics.
x <- nom_card(25)
x
#> [1] "twenty-five"
x + 2
#> [1] "twenty-seven"
sqrt(x)
#> [1] "five"
x < 30
#> [1] TRUE
x == "twenty-five"
#> [1] TRUE
Reverse it
uncardinal() attempts to convert character vectors of cardinal number names to numerics.
uncardinal(c("twenty-five", "negative three", "infinity"))
#> [1] 25 -3 Inf
Advantages 🚀
nombre is implemented using vectorized base R and runs faster than alternatives like english:
bench::mark(as.character(nom_card(1:1000)), as.character(english::english(1:1000)))
#> # A tibble: 2 × 6
#> expression min median `itr/sec` mem_alloc
#> <bch:expr> <bch:tm> <bch:tm> <dbl> <bch:byt>
#> 1 as.character(nom_card(1:1000)) 9.26ms 10.7ms 92.5 1.06MB
#> 2 as.character(english::english(1:1000)) 132.24ms 136.9ms 7.27 414.38KB
#> # … with 1 more variable: gc/sec <dbl>
Hex sticker image adapted from artwork by @allison_horst.
Hex sticker fonts are Source Sans by Adobe and Permanent Marker by Font Diner.
Please note that nombre is released with a Contributor Code of Conduct. By contributing to this project, you agree to abide by its terms.