title: R Shiny reactive object as a vector (ggplot)
body: <p>in my Shiny App I want to have textinput, action button and grapf plotted after clicking action but.</p>
  <p>My problem is how to use in reactive in gtrends function (from gtrendsR package).</p>
  <pre><code>    ui &lt;- fluidPage(
  
    textInput(&quot;fraza&quot;, &quot;Wpisz fraze do wyszukania w Google Trends&quot;, &quot;...&quot;)  
    ,actionButton(&quot;ab&quot;, &quot;An action button&quot;)
    ,plotOutput(&quot;gtr&quot;)
  )
  ######################
  server &lt;- function(input, output) {
    
  library(gtrendsR)  
      
  observeEvent(input$ab, {
    output$fraza &lt;- renderText({input$fraza})
  
    zm &lt;- reactive({input$fraza})
    library(gtrendsR)  
      gtr &lt;- gtrends(zm)
      output$gtr &lt;- renderPlot({plot(gtr)})
                               
                               
    
  }) #zamkniecie observe
    
    } #zamkniecie server
  
    
  ###################
  shinyApp(ui, server)
  
  #################
  </code></pre>
  <p>Could You help me?</p>