有没有一种简单的方法来获得带有北约语音字母的矢量?

Bon*_*ono 1 r paste

考虑以下向量

x <- paste0(LETTERS,1:26)
Run Code Online (Sandbox Code Playgroud)

我想在保留数字的同时用北约语音字母(alpha,bravo,charli等)替换这些字母.是否有一个载体r,类似于LETTERS具有完整的北约语音字母?

Jon*_*oll 5

我不知道内置列表.它只是一个单词的矢量,你可以自己得到它.

NATO <- strsplit("Alfa, Bravo, Charlie, Delta, Echo, Foxtrot, Golf, Hotel, India, Juliett, Kilo, Lima, Mike, November, Oscar, Papa, Quebec, Romeo, Sierra, Tango, Uniform, Victor, Whiskey, X-ray, Yankee, Zulu", ", ")
z <- paste0(unlist(NATO),1:26)
z
#>  [1] "Alfa1"      "Bravo2"     "Charlie3"   "Delta4"     "Echo5"     
#>  [6] "Foxtrot6"   "Golf7"      "Hotel8"     "India9"     "Juliett10" 
#> [11] "Kilo11"     "Lima12"     "Mike13"     "November14" "Oscar15"   
#> [16] "Papa16"     "Quebec17"   "Romeo18"    "Sierra19"   "Tango20"   
#> [21] "Uniform21"  "Victor22"   "Whiskey23"  "X-ray24"    "Yankee25"  
#> [26] "Zulu26"
Run Code Online (Sandbox Code Playgroud)