Added species_counts.R

Mimics species_counts.py and outputs to terminal in the exact same way.