Fast Grouped Counts and Means in R

Grouped counts and grouped (weighted)
means? How to calculate them? And how to do it as fast as possible?