对象“输入”未找到并对象“输出”；在 R Shiny 应用程序中找不到

Question

我正在尝试在 R 中的 Shiny App 中创建散点图，但我不断收到无法找到我的输入和输出的错误消息。我已经尝试了所有我能想到的可能导致这些问题的方法，但到目前为止尚未解决。我真的很感激一些帮助。我的代码如下：

我的 UI：

shinyUI(fluidPage(
  titlePanel("Scatterplot Basketball Statistics"),
    sidebarPanel(
      selectInput(inputId = "x", 
                    label = "Select variable to plot",
                      choices = names(dt.basketball),
                        selected = "Season"),
      selectInput(inputId = "y",
                    label = "Select variable to plot against",
                      choices = names(dt.basketball),
                        selected = "3PA"),
  #Output: Show the output of the scatter plot
  mainPanel(
    plotOutput(outputId = "scatterplot")
))
)
)

和我的服务器：

library(ggplot2)
library(shiny)

shinyServer(function(input,output){
    output$scatterplot <- renderPlot({
    
    ggplot(data = dt.basketball, aes_string(input$x, input$y) + geom_point())
   
})
})

我收到的错误消息如下：

Error in output$scatterplot <- renderPlot({ : object 'output' not found

和

Error in aes_string(input$x, input$y) : object 'input' not found