.html plotGoogleMap не загружается в блестящее приложение при развертывании на shinyapps.io

Question

Я пытаюсь вставить plotGoogleMap в блестящем приложении онлайн. Локально приложение работает отлично, но при загрузке через shinyapps в shinyapps.io.html карта не загружается.

Есть идеи, как решить эту проблему?

---

Смотрите мой код ниже.

ui.R

library('markdown')
library('shiny')

shinyUI(navbarPage("plotGooleMaps in shinyapps",
                   mainPanel(uiOutput('mymap'))
                  )
       )

server.R

library('shiny')
library('plotGoogleMaps')

shinyServer(function(input, output){
  output$mymap <- renderUI({
    data(meuse)
    coordinates(meuse) = ~x+y
    proj4string(meuse) <- CRS("+init=epsg:28992")
    m <- plotGoogleMaps(meuse, filename = 'myMap1.html', openMap = F)
    tags$iframe(
      srcdoc = paste(readLines('myMap1.html'), collapse = '\n'),
      width = "900Px",
      height = "500Px"
      )
  })
})

развернуть приложение с shinyapps

library('shinyapps')
setwd("~/working directory where ui.R and server.R are located locally")
deployApp()

---

Это журнал ошибок, но я не знаю, что из этого сделать:

[blocked] The page at 'about:srcdoc' was loaded over HTTPS, but ran 
insecure content from 'http://maps.google.com/maps/api/js?sensor=false': 
this content should also be loaded over HTTPS. about:srcdoc:1

     Uncaught ReferenceError: google is not defined about:srcdoc:21

GET https://chamaoskurumi.shinyapps.io/TESTmapSHINY
           /_w_cf38cbc66a336eaf0ab8b4e184402cba949ec9bc0b5cc5c0/Legendf4d2427a4.png 
           404 (Not Found) about:srcdoc:3419

    Uncaught ReferenceError: google is not defined about:srcdoc:1989
    initializeabout:srcdoc:1989
    onloadabout:srcdoc:3411

Answer 1

Кто-то на форуме shinyapps решил мою проблему. http должен быть заменен https в файле карты. Codewise, это означает, что:

readLines('myMap1.html')

должен быть заменен

gsub("http://maps.google.com/", 
     "https://maps.google.com/", 
     readLines('myMap1.html'), 
     fixed=TRUE)

Я также связался с автором, чтобы исправить это в следующем обновлении plotGoogleMaps пакет. Обратите внимание, что легенда не работает, но это, кажется, другая проблема