在ggplot上使用input $

Question

我正在尝试将下拉列表中的输出添加到ggplot

中的字段中

我想要使用的数据字段包含以下字段： Data image here

我用来在图表中输出的代码是：

ggplot(survey_data_sub, aes(fill=`Education level`, y=`Education level`, 
x=`Developer group`)) +
geom_bar( stat="identity")

这非常适合展示教育水平的结果。

我想从下拉列表中将“填充”和“y”动态化。所以我使用了以下闪亮的代码：

sidebarLayout(
           sidebarPanel(
             selectInput("newplot_select", "Choose Breakdown for chart:", 
                         list("UK location", "Education level", "Current 
salary", "Generation"))
               ),

               mainPanel(
                 textOutput("newPlot_selected_filter"),
                 plotOutput("newPlot")
               )
             )


 output$newPlot <- renderPlot({

    ggplot(survey_data_sub, aes(fill=input$newplot_select, 
    y=input$newplot_select, x=`Developer group`)) + 
    geom_bar( stat="identity")

 })

输入$ newplot_select 从下拉列表中提取内容。如果我只是在文本输出中输出输入$ newplot_select ，它会打印输入值。我怎么能在我使用过的ggplot代码中做到这一点？

感谢您的帮助