私はブランドの辞書を作成して特定の取引の入力をきれいにしてブランド名のみを抽出しようとしています

Question

gsubを使って辞書の中のすべての単語を消去しますが、 ？ こんにちは、私はクライアントが使用するブランドを明確に見るために取引をきれいにしようとしています。 「;」これはまで、すべての文字

tabla1_texto <- "exppcabify u.s.2313; 1212; 534" 

tabla1_texto <- gsub("cabify", "cabify-", tabla1_texto) 
tabla1_texto <- gsub(";", " ;",tabla1_texto) 
tabla1_texto <- gsub("-\\S* ","", tabla1_texto) 

「cabify」この消去をGSUBを使用して、ブランドの後にすべての単語を消去する例であり、どのように私は「expp」を削除することができますか？

ブランドの辞書を自動的に作成するにはどうすればいいですか？

おかげ

Answer 1

前の単語を削除するには、使用することができます。

gsub("\\w+(?=cabify)", "", tabla1_texto, perl = TRUE）

は前にすべてのものを削除するには、使用することができます：

gsub(".*(?=cabify)", "", tabla1_texto, perl = TRUE) 

出発点を用「辞書」は：

brands <- c("cabify", "thundersausage") 
    for (brand in brands) { 
    tabla1_texto <- gsub(brand, paste0(brand, "-"), tabla1_texto) 
    tabla1_texto <- gsub(";", " ;",tabla1_texto) 
    tabla1_texto <- gsub("-\\S* ","", tabla1_texto) 
    tabla1_texto <- gsub(paste0("\\w+(?=", brand, ")"), "", tabla1_texto, perl = TRUE) 
    } 
tabla1_texto # view the result