fork download
copy 
  1. string <- "<params description=\"some desc\" bgcol=\"255;0;0\"/>"
  2. lapply(strsplit(regmatches(string, regexec('bgcol="([^"]*)"', string))[[1]][2], ";"), as.integer)
  3. lapply(strsplit(regmatches(string, regexpr('bgcol="\\K[^"]*', string, perl=TRUE)), ";"), as.integer)
  4.  
Success #stdin #stdout 0.21s 185728KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
[[1]]
[1] 255   0   0

[[1]]
[1] 255   0   0
https://ideone.com/jaTilE
language:
R (R 3.5.2)
created:
5 years ago
visibility:
public

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!