Deploy of shiny app using regression method on declining slope