R Shiny：应用程序在本地运行，部署导致由于本地数据导致的错误

Question

错误：对象＆＃39;最终＆＃39;找不到

这让我疯了。我已确保将我的本地数据集放入名为“数据”的子目录中，使用相对路径在我的server.R文件中读取它，并确保我可以在本地运行该应用程序（没有问题）。任何线索？

server.R：

library(shiny)

library(ggplot2)
final <- read.csv("./Data/final.csv")
shinyServer(function(input, output) {
  output$table <- renderDataTable({
    if (input$bad !="All"){
      final <- final[final$bad == input$bad,]
    }
    final
  }, options=list(rowCallback= I('function(row, data) {
                                   if (data[1] > 15 & data[4] == 0)
                                   $("td", row).css("background", "lightgreen");}'), paging=FALSE))

})

ui.R：

library(shiny)
library(ggplot2)

shinyUI(
  fluidPage(
    titlePanel("Open Loans"),
    fluidRow(
      column(1, 
             selectInput("bad", 
                         "Bad:", 
                         c("All", 
                           unique(as.character(final$badPredict))))
      )        
    ),
    fluidRow(
      dataTableOutput(outputId="table")
    )    
  )  
)