regex - 英数字から数字を削除する

Question

次のような英数字のリストがあります。

x <-c('ACO2', 'BCKDHB456', 'CD444')

次の出力が欲しいです：

x <-c('ACO', 'BCKDHB', 'CD')

助言がありますか？

# dput(tmp2)

structure(c(432L, 326L, 217L, 371L, 179L, 182L, 188L, 268L, 255L,..., 
), class = "factor")

Answer 1

これに使用できますgsub：

gsub('[[:digit:]]+', '', x)

また

gsub('[0-9]+', '', x)
# [1] "ACO"    "BCKDHB" "CD" 

Answer 2

数字を削除するだけが目的の場合、このremoveNumbers()関数はテキストから数字を削除します。それを使用すると、間違いのリスクが軽減されます。

library(tm)

x <-c('ACO2', 'BCKDHB456', 'CD444') 

x <- removeNumbers(x)

x

[1] "ACO"    "BCKDHB" "CD"    

Answer 3

ストリンガーを使用する

ほとんどのストリンガー関数は正規表現を処理します

str_replace_allはあなたが必要とすることをします

str_replace_all(c('ACO2', 'BCKDHB456', 'CD444'), "[:digit:]", "")

Answer 4

stringiを使用したソリューション：

# your data
x <-c('ACO2', 'BCKDHB456', 'CD444')

# extract capital letters
x <- stri_extract_all_regex(x, "[A-Z]+")

# unlist, so that you have a vector
x <- unlist(x)

一行で解決策：