R函数将数字(23)转换为英语("二十三")

Lor*_*ein 3 r

是否有一个R函数将数值转换为英文表示?它会像这样工作:

> to.words(5)
[1] "five"
> to.words(23)
[1] "twenty-three"
Run Code Online (Sandbox Code Playgroud)

jub*_*uba 6

R-help上给出了一个小数字的示例函数:

http://finzi.psych.upenn.edu/Rhelp10/2008-March/155928.html

还有另一个(似乎更完整)由John Fox在5/1卷R新闻中发表,从第51页开始.该功能本身是第53页:

http://cran.r-project.org/doc/Rnews/Rnews_2005-1.pdf