Create server.R

Server file for the shiny app 'binTree'