title: I can't get my Shiny (in R) app scatterplot to render in the window
body: <p>An error that keeps coming up is <code>Error in output$barchart &lt;- renderPlotly({ : object 'output' not found</code></p>
  <p>I'm not quite sure what's going wrong here. I'm just kind-of overwhelmed by this project.</p>
  <p>I'm doing this project using the Midwest dataframe that is pre-loaded in dplyr</p>
  <p>I'm open to any edits anyone has on this. Aghghhhgghgh helppppp lol</p>
  <p>Here's my two files so far (server.R and ui.R)</p>
  <p>Server:</p>
  <pre><code>library(dplyr)
  library(tidyr)
  library(stringr)
  library(lintr)
  library(shiny)
  library(ggplot2)
  library(knitr)
  library(tidyverse)
  library(operators)
  library(magrittr)
  
  server &lt;- function(input, output) {
    
  output$barchart &lt;- renderPlotly({
  
  scatter &lt;- ggplot(data = midwest, 
           mapping = aes(x = percollege, y = percpovertyknown)) + 
      geom_point(aes(fill = state, size = popdensity), shape = 21, color = &quot;white&quot;) + 
    #  geom_smooth(aes(x = percollege, y = percpovertyknown)) +
      labs(
        x = &quot;Percent with college education&quot;, 
        y = &quot;Poverty rate&quot;, 
        title = &quot;Midwest Data&quot;,
        subtitle = &quot;States with higher college education rates tend to have lower poverty rates&quot;) + 
      scale_color_brewer(palette = &quot;Set1&quot;) + 
      scale_size(range = c(0, 12)) +
      guides(size = guide_legend(override.aes = list(col = &quot;black&quot;)), 
             fill = guide_legend(override.aes = list(size = 5))) +
      theme_bw()
    chartly &lt;- ggplotly(scatter)
    return(chartly)
  
  })
    }
  </code></pre>
  <p>ui:</p>
  <pre><code>library(shiny)
  library(ggplot2)
  library(dplyr)
  library(plotly)
  library(lintr)
  
  page_one &lt;- tabPanel(
    &quot;Introduction&quot;,
  ui &lt;-  fluidPage(
  
  # START OF PAGE 2 / CHART---------------------------------
  # Inputting Panel
  page_two_sidepanel &lt;- sidebarPanel(
    checkboxGroupInput(&quot;checkGroup&quot;,
                       label = h3(&quot;Select State&quot;), 
                       choices = list(&quot;Illinois&quot; = &quot;IL&quot;,
                                      &quot;Indiana&quot; = &quot;IN&quot;,
                                      &quot;Minnesota&quot; = &quot;MN&quot;,
                                      &quot;Ohio&quot; = &quot;OH&quot;,
                                      &quot;Wisconsin&quot; = &quot;WN&quot;),
                       selected = &quot;IL&quot;
    )
  ),
  
  page_two_mainpanel &lt;- mainPanel(
    h2(&quot;Barchart Comparison by Income Classification&quot;), 
    plotOutput(
      outputId = &quot;barchart&quot;
    )
  )
  </code></pre>