Added reading txt file into R