rm_long_words function

Delete rows in a text.table where the word has more than a minimum number of characters