R Shiny Horizon Plots