Updating Figures.R for SWH vs. Abundance

Renamed