shiny interface for the R scripts wnaetw