test display on shiny