r - 如何仅在 R 中提取第一个数字字符之前的所有文本

Question

我有一个变量 x，它是一系列字符，例如:

"W1W", "BT3", "BS5", "E1W", "B68"

从这里我需要提取第一个数字字符之前的字符以获得例如

"W", "BT", "BS", "E", "B"

我已经尝试查看以前的问题并发现:

gsub("[^a-zA-Z]", "", x)

但这会使文本字符跟在数字字符之后并导致:

"WW", "BT", "BS", "EW", "B"

有没有办法只获取数字字符之前的前导文本字符，然后删除所有字符？

Answer 1

x <- c("W1W", "BT3", "BS5", "E1W", "B68")

library(stringr)

str_extract(x, "^\\D+")

# [1] "W"  "BT" "BS" "E"  "B"