は、光沢のあるユーザー入力に基づいて異なるプロットを出力します

Question

selectInputガジェットはy軸を選択するようにユーザーに求めています。オプションはGenre、Experience、およびRatingです。作成した3つのバープロット（ratebars3、expbars3、genbars4）のいずれかを出力したいと思います。各プロットは同じx軸（会社）を持ちますが、グラフはyが何であるかに基づいて変化します。ここに私のUIで選択入力のためのコードは次のとおりです。

selectInput("selecty", label = h3("Select Y axis"), 
    choices = list("Rating", "Experience", "Genre")) 

私は運でサーバーに何らかのif.. returnタイプ文をしようとしています。ユーザーが入力した内容に基づいてプロットを表示できるサーバーコードを誰かが知っていれば、それは大きな助けになるでしょう。

Answer 1

私はプロットパッケージを使用していましたが、私自身の質問に答えているようです。 は、反応式を作成する必要がありました：

サーバー：

barplottest <- reactive({ 
    if ("Rating" %in% input$selecty) return(bars3) 
    if ("Experience" %in% input$selecty) return(expbars3) 
    if("Genre" %in% input$selecty) return(genbars4) 
    }) 

    output$barplot <- renderPlotly({ 
    dataplots = barplottest() 
    print(dataplots) 
    }) 

宇井

 selectInput("selecty", label = h3("Select Y axis"), 
        choices = list("Rating", "Experience", "Genre")), 
     plotlyOutput("barplot")