[r] R Language: How to print the first or last rows of a data set?