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