Create server.R

Server code for reefApp.