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

Question

我需要预处理语音记录以进行强制对齐。但是，我很难用文本表示替换年份。比如1984就需要换成“十九八十四”。我尝试了 qdap 包的 replace_number 功能。这个包很棒，但是它用“一千九百八十四”代替了1984。我可以尝试来自任何 R 包的其他功能吗？谢谢！

Answer 1

您可以将每个部分拆分为两个部分，并将每个部分分别转换为字符表示：

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

这将产生nineteen eightyfour