我需要预处理语音转录以进行强制对齐。但是，我很难用文本表示代替年份。例如，1984年需要替换为"一九八四"。我尝试了 qdap 包的replace_number功能。这个包装很棒，但它用"一千九百八十四"代替了 1984。我可以尝试任何 R 包中的其他函数吗？谢谢！
您可以将每个部分分成两个部分，并将每个部分分别转换为字符表示：
year = 1984
paste(
replace_number(substr(as.character(year), 1, 2),
replace_number(substr(as.character(year), 3, 4)
)
这将产生nineteen eightyfour