Added server.R for shiny bu