title: Error: unused arguments in Shiny (R)
body: <p>I wanted to begin by modifying a few components of one of the basic shiny example apps, but I keep getting this error:</p>
  
  <pre><code>ERROR: unused arguments (fluidRow(column(4, tags$hr(),
   verbatimTextOutput("out1"), selectInput("in1", "Options", choices =
   state.name, multiple = TRUE, selectize = FALSE))), fluidRow(column(4,
   tags$hr(), verbatimTextOutput("out2"), selectInput("in2", "Options",
   choices = state.name, multiple = TRUE, selectize = FALSE))))
  </code></pre>
  
  <p>Here is my code:</p>
  
  <h1>ui.R</h1>
  
  <pre><code>library(shiny)
  library(shinythemes)
  
  shinyUI(fluidPage(theme=shinytheme("flatly"),
    #Application Title
    headerPanel("States"),
    br(),
    fluidRow(
      column(4, 
             tags$h4("Choose One or Multiple States"))
    )),
    fluidRow(
      column(4,
             tags$hr(),
             verbatimTextOutput('out1'),
             selectInput('in1', 'Options', choices = state.name, multiple = TRUE, selectize = FALSE)
             )
    ),
    fluidRow(
      column(4,
             tags$hr(),
             verbatimTextOutput('out2'),
             selectInput('in2', 'Options', choices= state.name, multiple = TRUE, selectize = FALSE))
    ))
  </code></pre>
  
  <p>===============================================</p>
  
  <h1>server.R</h1>
  
  <pre><code>sessionInfo()
  install.packages("shiny")
  library(shiny)
  
  View(headcount)
  attach(headcount)
  headcount.crn=as.array(CRN)
  
  
  shinyServer(function (input, output, session) {
    output$out1 &lt;- renderPrint(input$in1)
    output$out2 &lt;- renderPrint(input$in2)
    })
  </code></pre>