Create server.R

server.R file for final project of shiny app