Added code for reading txt file into R