与闪亮的单选按钮不同的列答案

【问题标题】：different column from radio button in shiny与闪亮的单选按钮不同的列
【发布时间】：2021-09-03 18:11:39
【问题描述】：

)

我对 R 和 Shiny 都很陌生，但让我解释一下我目前的问题。

我有一个如下所示的 csv 文件：

Week	First	Second	Third
1	11	22	33
2	44	55	66
3	77	88	99

我创建了一个折线图，在 x 线上显示“周”，在 y 线上显示“第一”列。我还实现了我可以访问周之间的范围，以便我可以选择我想要查看的数据（f.E 仅第 2-3 周或 1-2 周）

我现在正在尝试做的是以下内容，我已经设置了一些单选按钮...

radioButtons("typeInput", "Choose",
              choices = c("First", "Second", "Third"),
              selected = "First"))

我试图让它交互，所以当我选择单选按钮“第二”时，我想查看折线图上“第二”列中的数据，与将始终选择的“周”列相比

到目前为止，这是我的服务器代码：

server <- function(input, output) {
output$PLOT <- renderPlot({
    filtered <-
      Data %>%
      filter(week>= input$Weekinput[1],
             week<= input$Weekinput[2]
      )
    ggplot(filtered, aes(week, First)) +
      geom_line()
  })
}

有没有人知道我怎样才能得到这个结果？

【问题讨论】：

标签： r shiny shinyapps

【解决方案1】：

您可以使用input$typeInput 从单选按钮中获取选定的值。

output$PLOT <- renderPlot({
  filtered <-
    Data %>%
    filter(week>= input$Weekinput[1],
           week<= input$Weekinput[2]
    )
  ggplot(filtered, aes(week, .data[[input$typeInput]])) +
    geom_line()
})

【讨论】：

我试图将“input$typeInput”放到 y 线上，但我没有工作......现在我试图弄清楚“.data”是关于什么的，然后我应该是很好走。多谢！！！！ :-)
.data 代词用于像这里这样传递字符串列名。 input$typeInput 是一个字符串值。