flex-wrap, zoom и sliderInput не работают вместе

Question

Это следующая проблема другой проблемы . Дано решение связанной проблемы. Но для простой модификации это дает другую проблему.

В решении я добавил 'zoom: 0.5;'. Теперь масштабирование работает, но я не могу правильно сдвинуть слайдер.

1. Ползунок в 1-й колонке работает нормально
2. Ползунок во 2-й колонке перемещается с 5 на 10
3. 3-ий и на подопечные не двигаются

код:

library(shiny)

ui <- fluidPage(
  fluidRow(
    tags$head(tags$style("
      .flex-nowrap {
        display: inline-flex;
        -webkit-flex-wrap: nowrap !important;
        -ms-flex-wrap: nowrap !important;
        flex-wrap: nowrap !important;
        flex-direction: row;
      }

      .custom-column {
        width: 200px;
        margin: 0px 10px;
      }      
      "
    )),
    actionButton("addCol","Add New Column"),
    div(style="zoom:0.5;overflow-x: auto;",
        uiOutput("myUI")
    )
  )
)

server <- function(input, output, session) {
  alld <- reactiveValues()
  alld$ui <- list()

  observeEvent(input$addCol,{

    alld$ui[[length(alld$ui)+1]] <- sliderInput("aaa","",1,10,5)

    output$myUI <- renderUI({
      fluidRow(class="flex-nowrap", lapply(alld$ui,function(x){div(class = "custom-column", x)}))
    })})
}

shinyApp(ui, server)