Final draft of code, correcting typo in ui.R.