Error: unused arguments in Shiny (R)

Error: unused arguments in Shiny (R)

我想从修改一个基本的闪亮示例应用程序的几个组件开始,但我不断收到此错误:

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))))

这是我的代码:

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)
  })

该错误通常表示您在某处弄乱了逗号或括号。在您的情况下,第一个 fluidRow 末尾的右括号 ()) 过多,这会过早地关闭 fluidPage

在我的例子中,这是因为当我使用 library(packageName) 加载两个具有相同函数名称的包时出现歧义。所以任何最终在这里调试的人也可以考虑这种可能性,以防上面写的不是这种情况。

如果有人遇到 selectInput:unused 参数 c("Cylinders"="cyl") 之类的错误,请使用 'list' 而不是 'c' 那里

我遇到了同样的问题并且有效