blocks|key|1585885|text|使用正则表达式和函数gsub()|type|unstyled|depth|inlineStyleRanges|offset|length|style|CODE|entityRanges|data|1585886|group+<-+c("12357e",+"12575e",+"197e18",+"e18947")
group
[1]+"12357e"+"12575e"+"197e18"+"e18947"

gsub("e",+"",+group)
[1]+"12357"+"12575"+"19718"+"18947"|code-block|syntax|javascript|1585887|gsub在这里所做的是用一个空字符串""替换每次出现的"e"。|1585888|1585889|有关更多帮助，请参阅?regexp或gsub。|1585890|entityMap^0|A|6|0|0|0|4|I|2|R|3|0|0|A|7|I|4|0^^$0|@$1|2|3|4|5|6|7|R|8|@$9|S|A|T|B|C]]|D|@]|E|$]]|$1|F|3|G|5|H|7|U|8|@]|D|@]|E|$I|J]]|$1|K|3|L|5|6|7|V|8|@$9|W|A|X|B|C]|$9|Y|A|Z|B|C]|$9|10|A|11|B|C]]|D|@]|E|$]]|$1|M|3|-4|5|6|7|12|8|@]|D|@]|E|$]]|$1|N|3|O|5|6|7|13|8|@$9|14|A|15|B|C]|$9|16|A|17|B|C]]|D|@]|E|$]]|$1|P|3|-4|5|6|7|18|8|@]|D|@]|E|$]]]|Q|$]]

With a regular expression and the function <code>gsub()</code>:

<pre><code>group &lt;- c("12357e", "12575e", "197e18", "e18947")
group
[1] "12357e" "12575e" "197e18" "e18947"

gsub("e", "", group)
[1] "12357" "12575" "19718" "18947"
</code></pre>

What <code>gsub</code> does here is to replace each occurrence of <code>"e"</code> with an empty string <code>""</code>.

<hr>

See <code>?regexp</code> or <code>gsub</code> for more help.

blocks|key|1585922|text|正则表达式是您的朋友：|type|unstyled|depth|inlineStyleRanges|entityRanges|data|1585923|R>+##+also+adds+missing+')'+and+sets+column+name
R>+group<-data.frame(group=c("12357e",+"12575e",+"197e18",+"e18947"))++)
R>+group
+++group
1+12357e
2+12575e
3+197e18
4+e18947|code-block|syntax|javascript|1585924|现在使用具有最简单替换模式的gsub()：空字符串：|offset|length|style|CODE|1585925|R>+group$groupNoE+<-+gsub("e",+"",+group$group)
R>+group
+++group+groupNoE
1+12357e++++12357
2+12575e++++12575
3+197e18++++19718
4+e18947++++18947
R>+|1585926|entityMap^0|0|0|E|6|0|0^^$0|@$1|2|3|4|5|6|7|Q|8|@]|9|@]|A|$]]|$1|B|3|C|5|D|7|R|8|@]|9|@]|A|$E|F]]|$1|G|3|H|5|6|7|S|8|@$I|T|J|U|K|L]]|9|@]|A|$]]|$1|M|3|N|5|D|7|V|8|@]|9|@]|A|$E|F]]|$1|O|3|-4|5|6|7|W|8|@]|9|@]|A|$]]]|P|$]]

Regular expressions are your friends:

<pre><code>R&gt; ## also adds missing ')' and sets column name
R&gt; group&lt;-data.frame(group=c("12357e", "12575e", "197e18", "e18947")) )
R&gt; group
 group
1 12357e
2 12575e
3 197e18
4 e18947
</code></pre>

Now use <code>gsub()</code> with the simplest possible replacement pattern: empty string:

<pre><code>R&gt; group$groupNoE &lt;- gsub("e", "", group$group)
R&gt; group
 group groupNoE
1 12357e 12357
2 12575e 12575
3 197e18 19718
4 e18947 18947
R&gt; 
</code></pre>

blocks|key|1585962|text|总结两种替换字符串的方法：|type|unstyled|depth|inlineStyleRanges|entityRanges|data|1585963|group<-data.frame(group=c("12357e",+"12575e",+"197e18",+"e18947"))|code-block|syntax|javascript|1585964|1)使用gsub|offset|length|style|CODE|1585965|group$group.no.e+<-+gsub("e",+"",+group$group)|1585966|2)使用stringr包|1585967|group$group.no.e+<-+str_replace_all(group$group,+"e",+"")|1585968|两者都将产生所需的输出：|1585969|+++group+group.no.e
1+12357e++++++12357
2+12575e++++++12575
3+197e18++++++19718
4+e18947++++++18947|1585970|entityMap^0|0|0|4|4|0|0|4|7|0|0|0|0^^$0|@$1|2|3|4|5|6|7|Y|8|@]|9|@]|A|$]]|$1|B|3|C|5|D|7|Z|8|@]|9|@]|A|$E|F]]|$1|G|3|H|5|6|7|10|8|@$I|11|J|12|K|L]]|9|@]|A|$]]|$1|M|3|N|5|D|7|13|8|@]|9|@]|A|$E|F]]|$1|O|3|P|5|6|7|14|8|@$I|15|J|16|K|L]]|9|@]|A|$]]|$1|Q|3|R|5|D|7|17|8|@]|9|@]|A|$E|F]]|$1|S|3|T|5|6|7|18|8|@]|9|@]|A|$]]|$1|U|3|V|5|D|7|19|8|@]|9|@]|A|$E|F]]|$1|W|3|-4|5|6|7|1A|8|@]|9|@]|A|$]]]|X|$]]

Summarizing 2 ways to replace strings:

<pre><code>group&lt;-data.frame(group=c("12357e", "12575e", "197e18", "e18947"))
</code></pre>

1) Use <code>gsub</code>

<pre><code>group$group.no.e &lt;- gsub("e", "", group$group)
</code></pre>

2) Use the <code>stringr</code> package

<pre><code>group$group.no.e &lt;- str_replace_all(group$group, "e", "")
</code></pre>

Both will produce the desire output:

<pre><code> group group.no.e
1 12357e 12357
2 12575e 12575
3 197e18 19718
4 e18947 18947
</code></pre>

blocks|key|1585972|text|使用stringi包：|type|unstyled|depth|inlineStyleRanges|entityRanges|offset|length|data|1585973|require(stringi)

group<-data.frame(c("12357e",+"12575e",+"197e18",+"e18947"))
stri_replace_all(group[,1],+"",+fixed="e")
[1]+"12357"+"12575"+"19718"+"18947"|code-block|syntax|javascript|1585974|entityMap|0|LINK|mutability|MUTABLE|url|http://rpackages.ianhowson.com/rforge/stringi/^0|2|7|0|0|0^^$0|@$1|2|3|4|5|6|7|Q|8|@]|9|@$A|R|B|S|1|T]]|C|$]]|$1|D|3|E|5|F|7|U|8|@]|9|@]|C|$G|H]]|$1|I|3|-4|5|6|7|V|8|@]|9|@]|C|$]]]|J|$K|$5|L|M|N|C|$O|P]]]]

Use the <a href="http://rpackages.ianhowson.com/rforge/stringi/" rel="noreferrer">stringi</a> package:

<pre><code>require(stringi)

group&lt;-data.frame(c("12357e", "12575e", "197e18", "e18947"))
stri_replace_all(group[,1], "", fixed="e")
[1] "12357" "12575" "19718" "18947"
</code></pre>

blocks|key|1585976|text|如果你想替换其中的一些字符，你不需要从字符串的向量创建数据帧。正则表达式是很好的选择，因为@Andrie和@Dirk+Eddelbuettel已经提到过。|type|unstyled|depth|inlineStyleRanges|entityRanges|data|1585977|请注意，如果您想替换特殊字符，如点，则应使用完整的正则表达式语法，如下例所示：|1585978|ctr_names+<-+c("Czech.Republic","New.Zealand","Great.Britain")
gsub("[.]",+"+",+ctr_names)|code-block|syntax|javascript|1585979|这将产生|1585980|[1]+"Czech+Republic"+"New+Zealand"++++"Great+Britain"+|1585981|entityMap^0|0|0|0|0|0^^$0|@$1|2|3|4|5|6|7|O|8|@]|9|@]|A|$]]|$1|B|3|C|5|6|7|P|8|@]|9|@]|A|$]]|$1|D|3|E|5|F|7|Q|8|@]|9|@]|A|$G|H]]|$1|I|3|J|5|6|7|R|8|@]|9|@]|A|$]]|$1|K|3|L|5|F|7|S|8|@]|9|@]|A|$G|H]]|$1|M|3|-4|5|6|7|T|8|@]|9|@]|A|$]]]|N|$]]

You do not need to create data frame from vector of strings, if you want to replace some characters in it. Regular expressions is good choice for it as it has been already mentioned by @Andrie and @Dirk Eddelbuettel.

Pay attention, if you want to replace special characters, like dots, you should employ full regular expression syntax, as shown in example below:

<pre><code>ctr_names &lt;- c("Czech.Republic","New.Zealand","Great.Britain")
gsub("[.]", " ", ctr_names)
</code></pre>

this will produce 

<pre><code>[1] "Czech Republic" "New Zealand" "Great Britain" 
</code></pre>

blocks|key|1585983|text|>+library(stringi)++++++++++++++++
>+group+<-+c('12357e',+'12575e',+'12575e',+'+197e18',++'e18947')++++++++++++++
>+pattern+<-+"e"++
>+replacement+<-++""++
>+group+<-+str_replace(group,+pattern,+replacement)++++++
>+group+
[1]+"12357"++"12575"++"12575"++"+19718"+"18947"+|type|code-block|depth|inlineStyleRanges|entityRanges|data|syntax|javascript|1585984|unstyled|entityMap^0|0^^$0|@$1|2|3|4|5|6|7|G|8|@]|9|@]|A|$B|C]]|$1|D|3|-4|5|E|7|H|8|@]|9|@]|A|$]]]|F|$]]

<pre><code>&gt; library(stringi) 
&gt; group &lt;- c('12357e', '12575e', '12575e', ' 197e18', 'e18947') 
&gt; pattern &lt;- &quot;e&quot; 
&gt; replacement &lt;- &quot;&quot; 
&gt; group &lt;- str_replace(group, pattern, replacement) 
&gt; group 
[1] &quot;12357&quot; &quot;12575&quot; &quot;12575&quot; &quot; 19718&quot; &quot;18947&quot; 
</code></pre>

I would like to remove specific characters from strings within a vector, similar to the Find and Replace feature in Excel. 

Here are the data I start with:

<pre><code>group &lt;- data.frame(c("12357e", "12575e", "197e18", "e18947")
</code></pre>

I start with just the first column; I want to produce the second column by removing the <code>e</code>'s:

<pre><code>group group.no.e
12357e 12357
12575e 12575
197e18 19718
e18947 18947
</code></pre>

Replace specific characters within strings

我想从矢量中的字符串中删除特定字符，类似于Excel中的查找和替换功能。以下是我开始使用的数据：group <- data.frame(c("12357e", "12575e", "197e18", "e18947")我从第一列开始；我想通过删除e来生成第二列：group group.no.e12357e ...

问替换字符串中的特定字符
EN

社区

活动

资源

关于

腾讯云开发者

热门产品

热门推荐

更多推荐

问替换字符串中的特定字符EN

社区

活动

资源

关于

腾讯云开发者

热门产品

热门推荐

更多推荐

问替换字符串中的特定字符
EN