updated ui.R for format