开发闪亮​​的Web应用程序，获取“未找到ui”错误消息

Question

目前使用Shiny软件包开发我的第一个Web应用程序，但不幸的是，在Rstudio上运行代码后遇到以下错误消息：

  

server＆lt; - function（input，output）{}   shinyApp（ui，server）   强制错误（ui）：找不到对象'ui'

可能是什么问题？

Answer 1

每个闪亮的页面都有一个ui和服务器元素。问题是你只定义了服务器，而不是ui。请参阅下面的一个非常基本的闪亮网页示例。

library(shiny)

# setwd(dirname(rstudioapi::getActiveDocumentContext()$path))  # set your working directory

# Set the ui section.
ui <- fluidPage(
  h1("Title"),
  selectInput("test.input", "Select a letter", choices = c("a", "b", "c")),
  textOutput("test.output")
)

# Set the server section.      
server <- function(input, output, session) {
  output$test.output <- renderText(
    paste0("You have selected ", input$test.input)
  )
}

shinyApp(ui = ui, server = server)

这个闪亮的应用程序有一个基本的标题，下拉菜单和HTML输出，它们都在ui变量中定义。您的页面应如下所示：

有关闪亮应用的基本布局的详情，请参阅this page。