R 闪亮的反应对象作为矢量（ggplot）

Question

在我的 Shiny App 中，我希望在单击操作后绘制文本输入、操作按钮和 grapf。

我的问题是如何在 gtrends 函数中使用 reactive（来自 gtrendsR 包）。

    ui <- fluidPage(

  textInput("fraza", "Wpisz fraze do wyszukania w Google Trends", "...")  
  ,actionButton("ab", "An action button")
  ,plotOutput("gtr")
)
######################
server <- function(input, output) {
  
library(gtrendsR)  
    
observeEvent(input$ab, {
  output$fraza <- renderText({input$fraza})

  zm <- reactive({input$fraza})
  library(gtrendsR)  
    gtr <- gtrends(zm)
    output$gtr <- renderPlot({plot(gtr)})
                             
                             
  
}) #zamkniecie observe
  
  } #zamkniecie server

  
###################
shinyApp(ui, server)

#################

你能帮帮我吗？

Answer 1

reactive函数的输出可以认为是一个函数。

当你使用 zm 时，你应该像 zm() 那样调用它，你应该不会有问题。

R 闪亮的反应对象作为矢量（ggplot）

R Shiny reactive object as a vector (ggplot)

r

reactive-programming

shiny

shinydashboard