Create server.R

This is the server code for creating the output that is shown in each tab.
Merge pull request #1 from wwwwkkkk/patch-2

Create server.R