Create server.R

server.R component for the dashboard