Edited from the Github file by ateucher.

numbers2words(x)

Arguments

x

Numeric

Value

Character. 'spelled out' (in english) x.

Examples

x <- 10
numbers2words(10)
#> [1] "ten"

x <- c(x, 0, 20)
numbers2words(x)
#> [1] "ten"    "zero"   "twenty"

x <- c(x, sample(1:10000,1))
numbers2words(x)
#> [1] "ten"                      "zero"                    
#> [3] "twenty"                   "three thousand, eighteen"