title: Create substring from string based on pattern and also retain the pattern inside the substring
body: <p>Is it possible to create substring from string based on pattern that matching a word <strong>but also retain the matching part</strong> ?</p>
  
  <pre><code>a &lt;- "contrainte que ilz ne contraint Que ris et jeux mais ne contrainte que jamais on ne contrainte que vous ne contraindre que de ne contraint que l' amour ne contraint que je ne contrainte que je ne contraint que je ne contrainte que l' homme arrive à ne contraint que nous ne contrainte que je ne contraintes que le créateur ne contrainte que l' opium même ne"
  </code></pre>
  
  <p>I would love to split the string when the pattern is present which is "cont".</p>
  
  <pre><code>strsplit(a, "cont", perl = T)
  
   [1] ""                                 "rainte que ilz ne "               "raint Que ris et jeux mais ne "   "rainte que jamais on ne "        
   [5] "rainte que vous ne "              "raindre que de ne "               "raint que l' amour ne "           "raint que je ne "                
   [9] "rainte que je ne "                "raint que je ne "                 "rainte que l' homme arrive à ne " "raint que nous ne "              
  [13] "rainte que je ne "                "raintes que le créateur ne "      "rainte que l' opium même ne" 
  </code></pre>
  
  <p>What I would love to do is exactly the same but retain the match part inside to substring.</p>
  
  <p>Thank you!</p>