Использование вывода inputBox в качестве входа для inputSlider в R Shiny

Проверьте эту удобную функцию:

def gets(*types):
    return tuple([types[i](val) for i, val in enumerate(raw_input().split(' '))])

# usage:
a, b, c = gets(int, float, str)
0
задан Michelle 17 January 2019 в 17:23
поделиться

1 ответ

Сначала, в пользовательском интерфейсе, измените value для параметра sliderInput, «EU_slider_DF» на value=1

, затем измените свой сервер, чтобы следовать этому

#Add session argument so we can push updates
server<-function(input,output,session){

#Output to our text output, render is reactive so directly use input

Сначала, в пользовательском интерфейсе, измените value для параметра sliderInput, «EU_slider_DF» на value=1

, затем измените свой сервер, чтобы следовать этому

[110] output$dropinput<-renderPrint({input$szenarios}) #Observe event used to monitor changes anytime the selectinput is changed observeEvent(input$szenarios,{ if (input$szenarios=="shiny"){ (dropinput<- 2) }else if (input$szenarios=="calculated") { (dropinput<- 3) }else{ (dropinput<-1) } #updates slider based on what is selected updateSliderInput(session,"EU_slider_DF",value=dropinput, min = 0, max = 3,step=0.001) }) }
0
ответ дан Chabo 17 January 2019 в 17:23
поделиться
Другие вопросы по тегам:

Похожие вопросы: