Updated code and programs to fit modern R/shiny style.