部署到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中？