converted df2tm_corpus to as.Corpus

use as for tm <-> qdap converions #183