Есть ли способ, которым вы можете обновить noUiSliderInput для двух значений, при запуске их как ноль? - PullRequest
Новая
       45

Есть ли способ, которым вы можете обновить noUiSliderInput для двух значений, при запуске их как ноль?

0 голосов
/ 13 марта 2020

Intro:

У меня есть список из 40 переменных, каждая из которых имеет 2000 записей, я работаю в R Shiny, чтобы попытаться автоматически разделить данные на 3 корзины на основе значения на 1/3 данных и 2/3 данных.

Каждая переменная имеет диапазон от -10 до 10.

Код UI ниже: 

selectInput("variable","Select your variable",choices = sort(colnames(train))),noUiSliderInput(inputId = "bins", label = "Choose bin width", min = -10, max = 10, value = c(NULL,NULL), orientation = "horizontal", margin = 1, width = 10000, color = "#68228B")

Код сервера: 

  ordered_data <- reactive({
    sort_test <- c(joined_adw[,input$variable])
    sort_test <- as.numeric(unlist(sort_test))
    sort_test <- sort(sort_test)
  })


 eventReactive(

    input$variable,{

 updateNoUiSliderInput(session = session, inputId = "bins", value = c(ordered_data()[667], test()[1334]))
    })


}

Я знаю, что есть другие способы сделать это, но мне нужен ползунок на листе отчета.

Любая помощь будет очень полезна, так как я пытаюсь сделать это некоторое время, и каждый раз, когда я пытаюсь это сделать, ползунок исчезает, когда я использую вызов обновления.

...