r - 使用R的Shiny包在ui.r文件中缺少mainPanel参数

我在R中运行Shiny来创建GUI，并且收到以下错误:ERROR: argument "mainPanel" is missing, with no default
但是，从下面的ui.r文件中的代码可以看到，我的确在底部包含了mainPanel，应该可以将其成功传递给sidebarLayout:

require(shiny)

shinyUI(fluidPage(
titlePanel("Approach"),
sidebarLayout(
    sidebarPanel(
        fileInput('file1', 'Choose file to upload',
                accept = c(
                    'text/csv',
                    'text/comma-separated-values',
                    'text/tab-separated-values',
                    'text/plain',
                    '.csv',
                    '.tsv'
                )
        )

    )
),
    mainPanel(
        plotOutput("plot")
    )



)
)

我还确保按照Error in RShiny ui.r argument missing的建议在mainPanel之前添加一个逗号。

任何建议，不胜感激。

最佳答案

需要在mainPanel函数内部调用sidebarLayout。参见?sidebarLayout:

require(shiny)

shinyUI(fluidPage(
  titlePanel("Approach"),
  sidebarLayout(
    sidebarPanel(
      fileInput('file1', 'Choose file to upload',
                accept = c(
                  'text/csv',
                  'text/comma-separated-values',
                  'text/tab-separated-values',
                  'text/plain',
                  '.csv',
                  '.tsv'
                )
      )

    ),
    mainPanel(
      plotOutput("plot")
    )
  )
)
)

关于r - 使用R的Shiny包在ui.r文件中缺少mainPanel参数，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/25225900/