initial server.R and ui.R