Update server.R

Added a progress bar for Ensemble Forecasting