R - 用通配符替換部分字符串

Question

我剛開始再次使用R，我想知道是否有一種方法可以用通配符替換部分字符串。

例如：

說我有

S1 <- "aaaaaaaaa[aaaaa]aaaa[bbbbbbb]aaaa" 

，我想方括號 'X'，內取代一切使得新的字符串是

"aaaaaaaaa[x]aaaa[x]aaaa" 

這是有可能在R做？

請注意方括號中的內容可以是可變長度的。

Answer 1

一個簡單的正則表達式將像

\\[.+?\\] 

例http://regex101.com/r/xE1rL1/1

示例用法

s1 <- 'aaaaaaaaa[aaaaa]aaaa[bbbbbbb]aaaa' 
gsub("\\[.+?\\]", "[x]", s1) 
## [1] "aaaaaaaaa[x]aaaa[x]aaaa" 

正則表達式

個

• \\[匹配開口[

• .+?的任何非貪婪匹配

• \\]比賽閉]

EDIT

爲了安全起見，如果沒有出現在該[]，那麼正則表達式可以稍加修改爲

s1 <- 'aaaaaaaaa[]aaaa[bbbbbbb]aaaa' 
gsub("\\[.*?\\]", "[x]", s1) 
##[1] "aaaaaaaaa[x]aaaa[x]aaaa" 

Answer 2

使用如下所示的積極lookahead和lookbehind斷言。

"(?<=\\[)[^\\[\\]]*(?=\\])" 

然後用x

> S1<-'aaaaaaaaa[aaaaa]aaaa[bbbbbbb]aaaa' 
> gsub("(?<=\\[)[^\\[\\]]*(?=\\])", "x", S1, perl=TRUE) 
[1] "aaaaaaaaa[x]aaaa[x]aaaa" 

說明更換匹配的字符：

• (?<=\\[)正回顧後發斷言，你要匹配的字符串必須由[符號開頭。
• [^\\[\\]]*匹配任何字符，但不匹配[或]零次或多次。
• (?=\\])積極的前瞻斷言，匹配必須後跟]符號。

Answer 3

也可以嘗試qdapRegex包，其中有這樣的問題的特殊方法：rm_square

library(qdapRegex) 
S1 <- "aaaaaaaaa[aaaaa]aaaa[bbbbbbb]aaaa" 
rm_square(S1, replacement = "[x]") 
## [1] "aaaaaaaaa[x]aaaa[x]aaaa" 

將工作同爲空方括號

S1 <- "aaaaaaaaa[]aaaa[bbbbbbb]aaaa" 
rm_square(S1, replacement = "[x]") 
## [1] "aaaaaaaaa[x]aaaa[x]aaaa" 

Answer 4

\\[[^\\]]+ 

你可以簡單地做到這一點，沒有預覽或soemthing.Rpelace由[x。看演示。

http://regex101.com/r/yR3mM3/13