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

Nin*_*cat 3 nlp r text-to-speech speech-synthesis qdap

我需要预处理强制对齐的语音记录.但是,我用文本表示替换年份有困难.例如,1984年需要被"1984年"取代.我尝试了qdap包的replace_number函数.包装很棒,但它取而代之的是1984年的"一千九百八十四".我可以尝试任何R包中的其他功能吗?谢谢!

Qui*_*ber 5

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

year = 1984
paste(
    replace_number(substr(as.character(year), 1, 2),
    replace_number(substr(as.character(year), 3, 4)
) 
Run Code Online (Sandbox Code Playgroud)

这会产生 nineteen eightyfour

  • 你可以在每个世纪的前十年添加一些特殊的逻辑. (2认同)