NA值匹配（R）

Question

我試圖找到termen_na_sound在soundexcodes[,2]的位置。我試過如下：

termen_na_sound_pos <- match(termen_na_sound, as.character(soundexcodes[,2])) 

但是每次都會返回幾個NA值。雖然我已經手動控制它，並且有匹配！這裏可能是什麼問題？

我也試過pmatch和charmatch但它是同樣的問題。

as.character(soundexcodes[188:300,2]) 
[1] "accounted"  "accountid"  "accounting"  "accyn"   "achternaam"  "aciditeit"  "acirca"   "ackn"    "acnartno"   
[10] "acnt"    "acompte"   "acount"   "acrartnu"   "acrpraku"   "acrstapw"   "acstaror"   "act"    "actie"   
[19] "actiecode"  "actiedatum"  "actief"   "actiekorting"  "actielijst"  "actielijstcode" "actielijstdatum" "actielijststap" "actiereden"  
[28] "actiestock"  "actieve"   "action"   "actiondttm"  "actionname"  "actions"   "activated"  "activatie"  "activatiecode" 
[37] "activation"  "active"   "activite"   "activiteit"  "activiteiten"  "activity"   "actn"    "actor"   "actual"   
[46] "add"    "added"   "adden"   "addition"   "addr"    "address"   "address1"   "address2"   "addressee"  
[55] "adf"    "adh"    "admi"    "admin"   "admininstratie" "adr"    "adres"   "adres1"   "adres2"   
[64] "adreslijn2"  "adreslijn3"  "adresse"   "adressen"   "adresverwerking" "adresvolledig" "aeid"    "afadatm"   "afadatp"   
[73] "afafilnr"   "afakdimp"   "afaktie"   "afartnum"   "afasrtak"   "afastock"   "afchecker"  "afco"    "afd"    
[82] "afdeling"   "afdelingnaam"  "afdelingnr"  "afdelingschef" "afdkdafd"   "afdr"    "afdronk"   "afep"    "aff"    
[91] "affc"    "affcd"   "afgecheckt"  "afgehaald"  "afgehouden"  "afgekeurd"  "afgekorte"  "afgerond"   "afgesl"   
[100] "afgesloten"  "afgevoerd"  "afgewerkt"  "afh"    "afhaalcode"  "afhaaldatum"  "afhaalpremie"  "afhaalptn"  "afhaalpuntnr"  
[109] "afhalen"   "afhaling"   "afhankelijkheden" "afhko"   "afhlpr"   

termen_na_sound_nieuw [100：200]
[1] 「佔」， 「會計」 「accyn」 「achternaam」 「acirca」 「acrartnu」 「acrpraku」 「acrstapw」 「acstaror」
[ 10]「actie」「actiecode」「actief」「actielijstcode」「actielijstdatum」「actielijststap」「actiereden」「actiestock」「action」
[19]「activatiecode」「activite」「activiteit」 adf「」admi「」admin「」adreslijn2「
[28]」adressen「」afdeling「」afdelingnaam「」afdelingschef「」afdkdafd「」aff cd「」afgecheckt「」afgehaald「」afgerond「
[37]」afgesl「」afgesloten「」afgewerkt「」afhaalpremie「」afhaalpuntnr「」afhalen「」afhaling「」afhlpr「。 「afkorting」
[46]「aflading」「afmeting」「afpuntdatum」「afpuntnr」「afronding」「afsluitdatum」「afsluiten」「afsluiter」「afsluiting」
[55]「afspr」「afstand」 「afw.ibo」「afwer」「afwezigheden」「afwezigheid」
[64]「afwezigheidscode」「afwezigheidsklasse」「afwijkend」「afwijziging」「afwijzing」「afwijzingsdatum」「afwklasse」「afzetten」「ag's 「
[73] 」通訊社「 」AGF「 」aggregatie「 」aghist「 」agobegda「 」agonkopr「 」akacts1「 」akfartnr「 」akffilnr「
[82] 」akffkdat「 」akfiartr「 」akfstock「 」aktfiars「 「aktiekorting」「alartikr」「alcohol」「alcoholterkte」「alfacode」
[91] 「ALG」 「algemeen」 「algval」， 「所有」， 「全看」， 「分配」， 「允許」 「altijd」 「alvo」
[100] 「量」， 「分析」

Answer 1

嘗試此：

match=c()  
for (i in length(termen_na_sound)){ 
     match<- which(grepl(termen_na_sound[i], as.character(soundexcodes[,2])))} 

Answer 2

如何

termen_na_sound_pos <- which(grepl('terman_na_sound',as.character(soundexcodes[,2]))) 

grepl返回邏輯TRUE/FALSE，並which提供它的TRUE指數。

使用match的缺點不僅在於它將返回NA，而且它不會完成整個向量。