R 2018年在shinyapps.io上部署的闪亮应用程序在2019年无法在本地运行

R 2018年在shinyapps.io上部署的闪亮应用程序在2019年无法在本地运行,r,shiny,shinyapps,packrat,R,Shiny,Shinyapps,Packrat,2018年期间,我参与了一个历史奴隶制地图闪亮应用程序项目 我的闪亮应用程序成功部署在shinyapps.io上。你可以看看我的项目 今天,我想升级我的应用程序,但不幸的是,UI不能在本地工作(白色屏幕,没有模式窗口,等等…) 我从Shinyapps.io下载我的应用程序包,使用2018年使用的packrat和独立软件包版本,但没有成功。我不清楚怎么做。在Rstudio中的Packages>Packrat>Options project>local repositories字段中。我必须指明捆绑

2018年期间,我参与了一个历史奴隶制地图闪亮应用程序项目

我的闪亮应用程序成功部署在shinyapps.io上。你可以看看我的项目

今天,我想升级我的应用程序,但不幸的是,UI不能在本地工作(白色屏幕,没有模式窗口,等等…)

我从Shinyapps.io下载我的应用程序包,使用2018年使用的packrat和独立软件包版本,但没有成功。我不清楚怎么做。在Rstudio中的Packages>Packrat>Options project>local repositories字段中。我必须指明捆绑包的packrat文件夹的路径吗

以下是地图中使用的软件包

library(shiny)
library(shinyWidgets)
library(leaflet)
library(dplyr)
library(dygraphs)
library(DT)
library(readr)
library(shinyjs)
library(shinyBS)
library(htmltools)
library(bsplus)
library(leaflet.extras)
library(dplyr)
library(tidyr)
library(readxl)
我的shinyapps包tar在我的github上

packrat.int()应该负责所有路径。但是,我认为问题在于
shinybs
包中的
bsModal
函数。如果你在你的应用程序中对这部分代码进行注释,它就会起作用

 shinyBS::bsModal(
    id = "startupModal",
    trigger = "",
    size = "large",
    tags$style(type = "text/css", "a { font-size: 12px; }"),
    tags$style(type = "text/css", "p { font-size: 12px; font-weight: bold; margin-bottom: 0px; }"),
    tags$style(type = "text/css", "hr { height: 1px;background: #8c8c8c; opacity: 1;}"),
    tags$h1("Principaux lieux de la traite atlantique"),
    tags$h4("Port de départ des expéditions, lieux d'achat et de débarquement des esclaves"),
    tags$h5("Lorem ipsum dolor sit amet, Phasellus vitae risus at mi semper accumsan. Vestibulum ullamcorper est quis nulla rutrum, non laoreet urna placerat. Praesent volutpat elit quam, egestas faucibus leo vulputate eget. Cras sit amet magna justo. Vestibulum ante ipsum primis in faucibus orci luctus et ultrices posuere cubilia Curae; Donec lobortis elit eget tempus feugiat. Praesent nec cursus odio. Vivamus ornare eget ipsum a interdum. Curabitur convallis feugiat nulla, eget sodales lorem molestie ut. Pellentesque habitant morbi tristique senectus et netus et malesuada fames ac turpis egestas. Etiam aliquet placerat lorem, id placerat orci auctor commodo. In metus lorem, ullamcorper volutpat congue in, tristique ac orci. Integer sed magna sed nisl maximus placerat. Vivamus nec eleifend nisi. Cras molestie sagittis tempor. Quisque quis sagittis massa."),
    tags$hr(),
    tags$p("Source des données  :  "), tags$a(class = "lien", href = "http://www.slavevoyages.org/", "The Trans-Atlantic Slave Trade Database (2010), Emory University, Données historiques (Domaine publique) - Données substituées (cc by-nc)"),
    tags$br(),
    tags$p("Couches cartographiques historiques  : "),
    tags$a("David Rumsey Map Collection", href = "https://www.davidrumsey.com/"),
    tags$br(),
    tags$p("Conception : "),
    tags$a("Wilfrid Cariou (2018)", href = "http://www.histoire.univ-nantes.fr/", "Université de Nantes, Département d'Histoire"),
    tags$br(),
    img(src = "index.jpg", width = "60", align = "left")
  ),
如果您查看broswer JS控制台,按下F12 chrome或firefox,您可能会发现shinybs导致的错误。这是一些
错误。但是,您可以在应用程序外部定义模态函数