fork download
copy 
  1. x <- "50A ABC DE 51A FG 52A HI 53A"
  2. rx <- "\\G(?:(?! X ).)*?\\K\\b\\d+A\\b"
  3. regmatches(x, gregexpr(rx, x, perl=TRUE))
  4. x <- "50A ABC DE 51A FG X 52A HI 53A"
  5. regmatches(x, gregexpr(rx, x, perl=TRUE))
Success #stdin #stdout 0.24s 39392KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
[[1]]
[1] "50A" "51A" "52A" "53A"

[[1]]
[1] "50A" "51A"
https://ideone.com/S6ZAm2
language:
R (R 3.5.2)
created:
4 years ago
visibility:
secret

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!