I wanted to begin by modifying a few components of one of the basic shiny example apps, but I keep getting this error:
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))))
Here is my code:
ui.R
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))
))
===============================================
server.R
sessionInfo()
install.packages("shiny")
library(shiny)
View(headcount)
attach(headcount)
headcount.crn=as.array(CRN)
shinyServer(function (input, output, session) {
output$out1 <- renderPrint(input$in1)
output$out2 <- renderPrint(input$in2)
})
Best Answer
That error usually means that you messed up your commas or brackets somewhere. In your case, there's one too many closing brackets (
)
) at the end of the firstfluidRow
that's closing thefluidPage
prematurely