Changed some input types and finished the shiny app