I can't display the SliderInput after running the app. This is causing an error.
output$ReactTimer <- renderUI({
req(input$Match)
sliderInput("Timer","Khel Kabaddi:",min = 1, value = max(data[data$MatchID == substr(input$Match, nchar(input$Match)-5,nchar(input$Match)),"RaidSequence"])*2,step=1,
max = max(data[data$Period %in% c(1,2) & data$MatchID == substr(input$Match, nchar(input$Match)-5,nchar(input$Match)),"RaidSequence"])*2,
animate = animationOptions(interval = 3000, loop = TRUE,
playButton = icon('play', "fa-2x"),
pauseButton = icon('pause', "fa-2x")))})