Convert a numeric to its corresponding english character.

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"                                  
#> [2] "zero"                                 
#> [3] "twenty"                               
#> [4] "two thousand, six hundred and fifteen"