R supprimer la non-alphanumériques, symboles à partir d'une chaîne

J'ai une chaîne et je veux enlever tous les non-alphanumériques, symboles, puis les mettre dans un vecteur. Donc:

"This is a string.  In addition, this is a string!" 

devient:

>stringVector1

"This","is","a","string","In","addition","this","is","a","string"

J'ai regardé grep(), mais ne peut pas trouver un exemple qui correspond. Des suggestions?

OriginalL'auteur screechOwl | 2012-01-22