ui.R: Completed.
server.R: Completed