Create server.R

Initial Commit