正则表达式 – 如何替换r中列中字符串的第n个字符

发布时间：2020-12-14 05:38:03 所属栏目：百科来源：网络整理

导读：我的意见是 a-c("aa_bbb_cc_ddd","ee_fff_gg_hhh")b-c("a","b")df-data.frame(cbind(a,b)) 我想要我的输出 a-c("aa_bbb-cc_ddd","ee_fff-gg_hhh")b-c("a",b)) 请帮忙解决方法你可以用sub, sub("^([^_]*_[^_]*)_","1-",df$a) 例： a-c("aa_bbb_cc_ddd","e

我的意见是

a<-c("aa_bbb_cc_ddd","ee_fff_gg_hhh")
b<-c("a","b")
df<-data.frame(cbind(a,b))

我想要我的输出

a<-c("aa_bbb-cc_ddd","ee_fff-gg_hhh")
b<-c("a",b))

请帮忙

解决方法

你可以用sub,

sub("^([^_]*_[^_]*)_","1-",df$a)

例：

> a<-c("aa_bbb_cc_ddd","ee_fff_gg_hhh")
> b<-c("a","b")
> df<-data.frame(cbind(a,b))
> df
              a b
1 aa_bbb_cc_ddd a
2 ee_fff_gg_hhh b
> df$a <- sub("^([^_]*_[^_]*)_",df$a)
> df
              a b
1 aa_bbb-cc_ddd a
2 ee_fff-gg_hhh b

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!