Function by John Fox found here: http://tolstoy.newcastle.edu.au/R/help/05/04/2715.html and https://github.com/ateucher/useful_code/blob/master/R/numbers2words.r

numbers2words(x)

Arguments

x

The numbers that need to be converted to string.

Examples

numbers2words(x = 1890)
#> [1] "one thousand, eight hundred and ninety"
numbers2words(x = 3)
#> [1] "three"
numbers2words(x = 1800090)
#> [1] "one million, eight hundred thousand, ninety"