r - 将字符拆分为字母和数字

Question

我有一个独特的角色，每个字母后面都有一个数字。例如:A1B10C5

我想把它分成 letter <- c(A, B, C)和number <- c(1, 10, 5)使用 R。

Answer 1

我们可以使用正则表达式查找来分割字母和数字

v1 <- strsplit(str1, "(?<=[A-Za-z])(?=[0-9])|(?<=[0-9])(?=[A-Za-z])", perl = TRUE)[[1]]
v1[c(TRUE, FALSE)]
#[1] "A" "B" "C"

as.numeric(v1[c(FALSE, TRUE)])
#[1]  1 10  5

数据

str1 <- "A1B10C5"