revert to slightly modified previous version of communityID that calculates communityID for a given geargroup.  i left the 5x code below - we should prob delete it later.
commented out write.csv line.
changed count argument to label.
added loop to run commID, remove small communities and vesselIDs and then export.