[r] How to get row index number in R?