visualization code using shiny package