fork download
  1. ColumnA=c("Kuala Lumpur 2 new","old Jakarta Sector31", "Sector 9, 7 Hong Kong","Jakarta new Sector22")
  2. gsub("^(?:.*Sector ?([0-9]+).*|.*)$","\\1",ColumnA)
Success #stdin #stdout 0.28s 22832KB
stdin
Standard input is empty
stdout
[1] ""   "31" "9"  "22"