部署到shinyapps.io热力图不显示

[pizifan]

尝试将热力图部署到shinyapps.io中，热力图不能显示，并有警告：

本地可以正常运行，代码如下： library(REmap) library(shiny)

UI <- fluidPage(

titlePanel("热力图展示"),

navlistPanel( "用户热力图", tabPanel("用户热力分布图",REmapOutput("remapp")),

widths = c(2, 8)

) )

server <- function(input, output) {

output$remapp <-renderREmap({

procvice <- mapNames('china') datas <- runif(34,0,1000)

df <- data.frame(procvice,datas)

options(remap.js.web=T)

remapC(df, title ="布热力图", subtitle = paste("车商总数：",sum(df$datas),sep=' '), maptype = "china", color = "red", theme = get_theme("Sky"), maxdata = 800, mindata = 0) }) }

shinyApp(ui = UI, server = server )

排除网络原因，该如何顺利完成部署到shinyapps.io中？