algorithms code snippets in r

find the kth most frequent element in an array in r