How to print the count using for loop in r