second version

included output text file, and added script to create it, in R code.