R Count Unique Values By Group