fork download
copy 
  1. string <- 'ABC  (2013c), Something Something Text (Volume II): Some more blabla, the usual, end of string'
  2.  
  3. rx <- paste0("\\b(?:[Vv]ol(?:ume)?|Issue|No|Nr|nr|no|Number)\\s*(?:\\d+|V?I{0,3}X?L?C{0,3}D?M?)")
  4. library(stringr)
  5. str_extract_all(string, rx)
Success #stdin #stdout 0.27s 42284KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
[[1]]
[1] "Volume II"
https://ideone.com/WTZTgX
language:
R (R 3.5.2)
created:
2 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!