Question

我是RShiny的新手，因此决定创建我的第一个应用程序。

当我使用此命令启动应用程序时，它会立即执行，一切都很好。

shinyApp(ui, server)

但是当我尝试将应用程序部署到Shinyapps.io服务器时，出现此错误

错误：未处理的异常：子任务547685425失败：解析错误 manifest：捆绑软件不包含清单文件：data /données.xlsx

Shiny似乎找不到我的文档données.xlsx，这是我正在读取应用程序数据的位置，但是我在代码中要做的第一件事就是设置目录。

这是我的代码：

setwd("C:/Users/Baillargeon/Desktop/R_PROG/RShiny_test")

library(shiny)
library(shinydashboard)
library(DT)
library(rsconnect)
library(ggplot2)
library(plotly)
library(dplyr)
library(xlsx)

donnees <- read.xlsx("data/données.xlsx", sheetName = "donnees", encoding = "UTF-8")

[...]

ui <- dashboardPage(


      dashboardHeader(title = "Employés"),
      dashboardSidebar(
        sidebarMenu(
          menuItem("Jeu de données",tabName="Donnees",icon=icon("database")),
          menuItem("Graphiques",tabName="graph",icon=icon('signal'))
        )
      ),

      dashboardBody(
        tabItems(

          tabItem(tabName="Donnees",
                  h2("Données"),
                  DT::dataTableOutput("donnees")
                 ),

          tabItem(tabName = "graph", h2("Graphiques"),
                  fluidRow(
                    box(plotlyOutput("plot_sites")),
                    box(plotlyOutput("plot_sexe"))

                          )
                 )
                )
        )
)


server <- function(input,output){

  output$donnees = DT::renderDataTable({

    donnees
  })

  output$plot_sites <- renderPlotly({
    plot_ly(final_sites, labels= final_sites$Site, values= final_sites$Freq, type="pie",
            textposition = 'inside',
            textinfo = 'label+percent',
            showlegend = FALSE
           ) %>%
          layout(title="Répartition des employés selon l'arondissement")
  })

  output$plot_sexe <- renderPlotly({
    plot_ly(final_sexe, labels= final_sexe$Sexe, values= final_sexe$Freq, type="pie",
            textposition = 'inside',
            textinfo = 'label+percent',
            showlegend = FALSE
    ) %>%
      layout(title="Répartition des employés selon leurs Sexe")
  })


}


shinyApp(ui, server)


rsconnect::deployApp("C:/Users/Baillargeon/Desktop/R_PROG/RShiny_test")

有人知道如何解决此错误吗？

谢谢

Answer 1

删除setwd("C:/Users/Baillargeon/Desktop/R_PROG/RShiny_test")作为第一行。当您在Shinyapps.io上进行部署时，它是一个Linux环境。因此C:/毫无意义。

此外，默认情况下，您的工作目录是ui.R和server.R所在的目录。因此，您的数据文件夹路径应与此相关。从您的代码看起来像这样。

阅读文档9.4 “Disconnected from server” messages

希望有帮助

我的Shinydashboard应用程序未部署：捆绑软件不包含清单文件

1 个答案: