Moved initial variables inside of the shinyServer funct.
Removed double arrows.
Optimized the server.R