在R中将年份替换为英文单词

3

我需要对演讲文本进行强制对齐前处理。但是,我在将年份替换为文本表示方面遇到了困难。例如,1984需要替换为“十九八四”。我尝试了qdap软件包的replace_number功能。该软件包非常棒,但它将1984替换为“一千九百八十四”而不是“十九八四”。是否有其他任何R软件包的函数可以尝试?谢谢!


英文包由Bill Venables制作。 - mdsumner
谢谢,这正是我所需要的! - Ninjadog
请查看 https://github.com/coolbutuseless/numberwang。 - mdsumner
1个回答

5

你可以将每个字符分成两部分,并分别将每个部分转换为字符表示:

year = 1984
paste(
    replace_number(substr(as.character(year), 1, 2),
    replace_number(substr(as.character(year), 3, 4)
) 

这将产生nineteen eightyfour

但是1903年的情况怎么办?我该如何将其变成“十九零三”? - Ninjadog
2
你可以为每个世纪的前十年添加一些特殊逻辑。 - Quinn Weber
谢谢!这真聪明! - Ninjadog

网页内容由stack overflow 提供, 点击上面的
可以查看英文原文,
原文链接