Update server.R

This should basically solve the problem where the country colors changed when different countries where selected.
removed some code I copy/pasted by mistake
Merge pull request #7 from tpoisot/patch-1

Add constant country colors, Solve #2 ?