如果我们有数字，那么我们可能希望将这些数字转换为单词。例如，将1转换为1。如果我们有文本数据并且数字是文本的一部分，则可能需要这样做。因此，最好以文本形式表示数字，以使文本保持一致。这可以通过使用replace_number函数qdap软件包来完成。
安装和加载qdap软件包-
install.packages("qdap")
library("qdap")replace_number("1")
[1] "one"
replace_number("10")
[1] "ten" replace_number("100")
[1] "one hundred"
replace_number("1000")
[1] "one thousand"
replace_number("1001")
[1] "one thousand one"
replace_number("12000")
[1] "twelve thousand"
replace_number("12214")
[1] "twelve thousand two hundred fourteen"
replace_number("15748")
[1] "fifteen thousand seven hundred forty eight" replace_number("2361414")
[1] "two million three hundred sixty one thousand four hundred fourteen" replace_number("321457")
[1] "three hundred twenty one thousand four hundred fifty seven" replace_number(c("1","2","3","4","5","6","7","8","9","10"))
[1] "one" "two" "three" "four" "five" "six" "seven" "eight" "nine"
[10] "ten" replace_number(c("321457","214521","365841"))
[1] "three hundred twenty one thousand four hundred fifty seven"
[2] "two hundred fourteen thousand five hundred twenty one"
[3] "three hundred sixty five thousand eight hundred forty one" replace_number(c("264155","154512","344512","2144","221","14542","35915112","1454221","147232321","14789523"))
[1] "two hundred sixty four thousand one hundred fifty five"
[2] "one hundred fifty four thousand five hundred twelve"
[3] "three hundred forty four thousand five hundred twelve"
[4] "two thousand one hundred forty four"
[5] "two hundred twenty one"
[6] "fourteen thousand five hundred forty two"
[7] "thirty five million nine hundred fifteen thousand one hundred twelve"
[8] "one million four hundred fifty four thousand two hundred twenty one"
[9] "one hundred forty seven million two hundred thirty two thousand three hundred twenty one"
[10] "fourteen million seven hundred eighty nine thousand five hundred twenty three"x <-c（“印度有29个州”）replace_number(x)
[1] "There are twenty nine states in india"
y <-c（“ 1025454人患了covid-19”）replace_number(y)
[1] "one million twenty five thousand four hundred fifty four people suffered from covid-nineteen"
z <-c（“世界上有22个阿拉伯国家”）replace_number(z)
[1] "We have twenty two Arab countries in the world"
v1 <-sample（0：5000,20）v1
[1] 1845 4438 4664 1803 1131 4254 4880 4267 4764 4168 222 3880 534 1319 4998 [16] 370 2657 78 1056 620 replace_number(v1) [1] "one thousand eight hundred forty five" [2] "four thousand four hundred thirty eight" [3] "four thousand six hundred sixty four" [4] "one thousand eight hundred three" [5] "one thousand one hundred thirty one" [6] "four thousand two hundred fifty four" [7] "four thousand eight hundred eighty" [8] "four thousand two hundred sixty seven" [9] "four thousand seven hundred sixty four" [10] "four thousand one hundred sixty eight" [11] "two hundred twenty two" [12] "three thousand eight hundred eighty" [13] "five hundred thirty four" [14] "one thousand three hundred nineteen" [15] "four thousand nine hundred ninety eight" [16] "three hundred seventy" [17] "two thousand six hundred fifty seven" [18] "seventy eight" [19] "one thousand fifty six" [20] "six hundred twenty"
v2 <-sample（100001：999999,20）
v2
[1] 359487 994098 458703 474531 106581 905167 373805 288612 614544 591035 [11] 632526 649772 711979 785355 720779 678609 843081 679009 593148 801554
replace_number(v2)
[1] "three hundred fifty nine thousand four hundred eighty seven" [2] "nine hundred ninety four thousand ninety eight" [3] "four hundred fifty eight thousand seven hundred three" [4] "four hundred seventy four thousand five hundred thirty one" [5] "one hundred six thousand five hundred eighty one" [6] "nine hundred five thousand one hundred sixty seven" [7] "three hundred seventy three thousand eight hundred five" [8] "two hundred eighty eight thousand six hundred twelve" [9] "six hundred fourteen thousand five hundred forty four" [10] "five hundred ninety one thousand thirty five" [11] "six hundred thirty two thousand five hundred twenty six" [12] "six hundred forty nine thousand seven hundred seventy two" [13] "seven hundred eleven thousand nine hundred seventy nine" [14] "seven hundred eighty five thousand three hundred fifty five" [15] "seven hundred twenty thousand seven hundred seventy nine" [16] "six hundred seventy eight thousand six hundred nine" [17] "eight hundred forty three thousand eighty one" [18] "six hundred seventy nine thousand nine" [19] "five hundred ninety three thousand one hundred forty eight" [20] "eight hundred one thousand five hundred fifty four"