loads data in server.R