created UI.R and server.R