r shinyapps 手动执行时部署错误

Question

我在 https://www.shinyapps.io/ 上有一个 shinnyapp，我通常可以使用“发布”按钮部署该应用程序。

但是我想使用下面代码中的 deployApp 函数：

rsconnect::deployApp("~/Documents/R/shinny",appName="myapp", account="myaccount")

但是当使用 deployApp 函数时，它在网络浏览器上出现错误：

An error has occurred

The application failed to start: exited unexpectedly with code 1

Attaching package: ‘dplyr’

The following objects are masked from ‘package:plyr’:

    arrange, count, desc, failwith, id, mutate, rename, summarise,
    summarize

The following objects are masked from ‘package:stats’:

    filter, lag

The following objects are masked from ‘package:base’:

    intersect, setdiff, setequal, union

Error in value[[3L]](cond) : could not find function "dashboardPage"
Calls: local ... tryCatch -> tryCatchList -> tryCatchOne -> <Anonymous>
Execution halted

所以如果按下按钮，没问题，但如果我使用该功能，它就会出错。

我的Rscript结构如下（函数中有更多代码，但我尽量简单举例）

library(shinydashboard)
library(shiny)
library(ggplot2)
library(dplyr)
library(scales)
library(lubridate)
library(zoo)
library(reshape2)
library(scales)
library(ggrepel)
library(stringr)
load("sales.RData")

sidebar <- dashboardSidebar(
                              
                            )
)

body <- dashboardBody(
)

ui <- fluidPage(dashboardPage(
  dashboardHeader(),
  sidebar,
  body
)
)


server <- function(input, output) {
  
}

# Run the application 
shinyApp(ui = ui, server = server)

rsconnect::deployApp('C:\Users\Repro\Documents\R\SHINY', 
                     appFiles = c('app.R','sales.RData','www/custom.css'), 
                     account = 'myaccount', server = 'shinyapps.io')

可能是什么问题？

谢谢

Answer 1

经过反复试验，我解决了问题。

我的错误是试图执行包括部署脚本在内的 app.R 脚本。

当我运行如下单独部署脚本时，它有效：

    rsconnect::setAccountInfo(name='myaccount',
                          token='xxxxxxxxx',
                          secret='yyyyyyyy')

rsconnect::deployApp(appDir = 'C:\Users\Documents\R\SHINY',appFiles=c('app.R','sales.RData','www/custom.css'),
account = 'myaccount', server = 'shinyapps.io')

r shinyapps 手动执行时部署错误

r shinyapps deployment error when doing it manually

r

shinyapps