Rtools>rDataToCorpus, use filter before anychanges