Write R Script readTextTranscript.r

Write R script readTextTranscript.r to create data.frame for processing in qdap package.