如何在儀表圖中使用反應過濾數據集？

Question

我是比較新的shiny和flexdashboard ，但我想從篩選的數據集生成計圖表。

目標是過濾一個變量上的數據集（在 ReprEx 中它是gear ），然后從過濾后的數據集中提取另一個變量中的最低值（在 ReprEx 中，我想找到最低的mpg ）。

首先，我選擇輸入。

selectInput("x", "Gear", choices = mtcars$gear)

然后我目前正在創建一個反應數據集，在側邊欄中帶有一個齒輪過濾器。

df <- reactive({
  mtcars %>% filter(gear == input$x)
})

最后，我渲染儀表圖，嘗試將列mpg提取到向量x ，然后將min(x)輸入儀表圖。

renderPlot({
     x <- df()[,"mpg"]
gauge(min(x), min = 0, max = 50, gaugeSectors(
  success = c(41, 50), warning = c(21, 40), danger = c(0, 20)
))
})

在這個過程中我哪里出錯了？

謝謝。

Answer 1

您應該使用renderGauge而不是renderPlot

查看官方文檔