3

有没有一种简单的方法可以从字符串中删除特定字符。在下面的示例中，我想从向量的每个元素中删除最后三个字符。

string<-c("Autauga AL", "Bald Win Av", "Barbour AL", "Bibb AL" ,   "Blount At" , "Bullock AL")
4

3 回答 3

13

strtrim和怎么样nchar？

strtrim(string, nchar(string)-3)
# [1] "Autauga"  "Bald Win" "Barbour"  "Bibb"     "Blount"   "Bullock"

您还可以使用“stringi”包：

library(stringi)
stri_sub(string, 1, -4)
# [1] "Autauga"  "Bald Win" "Barbour"  "Bibb"     "Blount"   "Bullock"

的默认值stri_sub是to = -1L，因此要删除最后三个字符是-1 - 3 = -4。

于 2013-10-11T17:01:16.110 回答
6

使用gsub()，删除前面的三个字符$（表示“字符串结尾”的正则表达式字符）：

gsub(".{3}$", "", string)
[1] "Autauga"  "Bald Win" "Barbour"  "Bibb"     "Blount"   "Bullock"
于 2013-10-11T17:10:11.077 回答
0

另一种正则表达式方法：

gsub("(.*)\\s.*", "\\1", string)
## [1] "Autauga"  "Bald Win" "Barbour"  "Bibb"     "Blount"   "Bullock"
于 2013-10-11T18:21:32.600 回答