change na using a slider as a table range

shiny
,
2

Hi @DiegoVilla. I would change the reactive expression mt as follow.

  mt <- reactive({
    mutate(a, codigo = `[<-`(codigo, input$slider2[1]:input$slider2[2], replace_na(codigo[input$slider2[1]:input$slider2[2]], 666)))
  })