Create server.R

FFShiny SERVER file