fork download 
  1. awards <- c("Won 1 Oscar.",
  2.             "Won 1 Oscar. Another 9 wins & 24 nominations.",
  3.             "1 win and 2 nominations.",
  4.             "2 wins & 3 nominations.",
  5.             "Nominated for 2 Golden Globes. 1 more win & 2 nominations.",
  6.             "4 wins & 1 nomination.")
  7.  
  8. sub(".*\\s([0-9]+)\\snomination.*$", "\\1", awards)
Success #stdin #stdout 0.2s 175424KB
comments (?)
stdin 
Standard input is empty
stdout 
[1] "Won 1 Oscar." "24"           "2"            "3"            "2"           
[6] "1"
https://ideone.com/R03jGK
language:
R (R 3.5.2)
created:
8 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!