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] "five thousand, two hundred and ninety three"