title: Extract Phone Numbers from a string in R
body: <p>I am working on extraction from a text - using <code>'stringr'</code> package in R.I found this example:</p>
  
  <pre><code>strings &lt;- c(" 219 733 8965", "329-293-8753 ", "banana", "595 794 7569",
  "387 287 6718", "apple", "233.398.9187 ", "482 952 3315",
  "239 923 8115", "842 566 4692", "Work: 579-499-7527", "$1000",
  "Home: 543.355.3679")
  pattern &lt;- "([2-9][0-9]{2})[- .]([0-9]{3})[- .]([0-9]{4})"
  str_extract(strings, pattern)
  str_extract_all(strings, pattern)
  </code></pre>
  
  <p>However my string is in the below format:</p>
  
  <pre><code>strings &lt;- c("87225324","65-62983211","65-6298-3211","8722 5324","(65) 6296-2995","(65) 6660 8060","(65) 64368308","+65 9022 7744","+65 6296-2995","+65-6427 8436","+65 6357 3323/322")
  </code></pre>
  
  <p>But i am not sure about the <code>pattern</code> to extract all the above format.Any help would be great.</p>