server.R component of the dashboard.