用R中的英文单词替换年份

Replacing year with English words in R

我需要预处理语音记录以进行强制对齐。但是,我很难用文本表示替换年份。例如,1984 需要替换为 "nineteen eighty four"。我尝试了 qdap 包的 replace_number 功能。该软件包很棒,但它用 "one thousand nine hundred eighty four" 代替了 1984。我可以尝试使用任何 R 包中的其他功能吗?谢谢!

您可以将每个部分拆分为两部分,并将每个部分分别转换为字符表示形式:

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

这会产生 nineteen eightyfour