Readlines Function In R Language