Jak powinienem podzielić i zachować elementy za pomocą strsplit?

Question

Funkcja strsplit w R ma, dopasuj i usuń dane wyrażenie regularne, aby podzielić resztę łańcucha na wektory.

>strsplit("abc123def", "[0-9]+") 
[[1]] 
[1] "abc" "" "" "def" 

Ale w jaki sposób powinienem podzielić strunę w ten sam sposób, używając wyrażenia regularnego, ale także zachować dopasowania? Potrzebuję czegoś takiego.

>FUNCTION("abc123def", "[0-9]+") 
[[1]] 
[1] "abc" "123" "def" 

Korzystanie strapply („abc123def”, „[0-9] + | [az] +”) pracuje tutaj, ale co jeśli reszta ciąg innych niż mecze nie mogą zostać przechwycone przez wyrażenie regularne ?

Answer 1

Zasadniczo wydaje mi się, że nie należy dzielić się na [0-9]+, ale podzielić na przejście między [0-9]+ i wszystkim innym. W twoim ciągu to przejście nie istnieje wcześniej. Aby wstawić go, można wstępnie proces gsub i back-odniesienie:

test <- "abc123def" 
strsplit(gsub("([0-9]+)","~\\1~",test), "~") 

[[1]] 
[1] "abc" "123" "def" 

Answer 2

Można użyć strapply z pakietu gsubfn.

test <- "abc123def" 
strapply(X=test, 
     pattern="([^[:digit:]]*)(\\d+)(.+)", 
     FUN=c, 
     simplify=FALSE) 

[[1]] 
[1] "abc" "123" "def" 

Answer 3

Można używać twierdzeń dotyczących spojrzeń.

> test <- "abc123def" 
> strsplit(test, "(?<=\\D)(?=\\d)|(?<=\\d)(?=\\D)", perl=T) 
[[1]] 
[1] "abc" "123" "def"