tm reading in data frame and keep text's id

Here are some useful discussions.