Create predict_server.R