I have a character vector (vec) like this: 

```
[1] "super good dental associates"   "cheap dentist in bel air md"    
    "dentures   "                    "dentures   "                    
    "in office teeth whitening"      "in office teeth whitening"      
    "dental gum surgery bel air, md"
[8] "dental implants"                "dental implants"                
    "veneer teeth pictures"

```

I need to break this apart into individuals words. I tried this: 

```
singleWords <- strsplit(vec, ' ')[[1]]

```

but, I only get the split on the first element of that vector: 

```
[1] "super"      "good"       "dental"     "associates"

```

How can I get a single vector of ALL the words as individual elements?