update server.R