Tests with R package shiny