R 基于单选按钮选择创建绘图

我正在尝试创建一个闪亮的应用程序。用户界面

UI.R

看起来很好，但我在

server.R

方面遇到了问题。基本上，我希望根据用户选择的

radio

选项使用不同的打印输出

用户可以选择选项

A

、

B

或

C

。如果用户选择选项

a

，我想画一个直方图，

B

的条形图，以及选项

C

的饼图，但我不知道如何对条件进行编码？它是否像一个

if-else

语句？我已经挣扎了几个小时了！以下是我的代码示例：

output$plots <- renderPlot({    
   if selection == 'A'
      # plot histogram
   if selection == 'B'
      # plot bar chart
   if selection == 'C'
      # plot pie chart
})

---

output$plots您可以使用开关根据选择确定行为：

library(shiny)
myData <- runif(100)
plotType <- function(x, type) {
  switch(type,
         A = hist(x),
         B = barplot(x),
         C = pie(x))
}
runApp(list(
  ui = bootstrapPage(
    radioButtons("pType", "Choose plot type:",
                 list("A", "B", "C")),
    plotOutput('plot')
  ),
  server = function(input, output) {
    output$plot <- renderPlot({ 
       plotType(myData, input$pType)
    })
  }
))

库（闪亮）
我的数据