私はローカルで動作するshinyappで作業していますが、shinyapps.ioに公開しようとするたびにエラーが発生します。リーフレットとグーグルシートAPIを使用してshinyappを導入する際のエラー
私はリーフレットを使ってアプリを公開していますが、他のアプリでもグーグルシートを使用していて、そのパッケージも正常に動作しています。しかし、私がそれらを完全に使用すると、アプリケーションは返されますError : there is no package called ‘leaflet’.
この例のアプリケーションではパッケージが見つかるため、どちらが奇妙ですか。
リーフレットの作業:
library(shiny)
library(leaflet)
# UI
ui <-(fluidPage("Example", leafletOutput("map")))
# Server
server = (function(input, output) {
output$map <- renderLeaflet({
leaflet() %>%
addProviderTiles("CartoDB.Positron") %>%
setView(-58.43152, -34.6052, zoom=11)
})
})
shinyApp(ui = ui, server = server)
リーフレットない作業は:
library(shiny)
library(leaflet)
library(googlesheets)
library(sp)
library(rgdal)
library(DT)
options("googlesheets.httr_oauth_cache" = "gs_auth")
gs_auth()
rdv <- gs_url("https://docs.google.com/spreadsheets/d/1eWxmy7kSjWVfloJiS4ycjn4YKx2OybIzWogX7ga4fUQ/edit?usp=sharing", lookup = NULL, visibility = NULL, verbose = TRUE)
shape <- readRDS("shape_ok.rds")
bounds <- bbox(shape)
sheet <- gs_read(rdv, ws = 3)
# UI
ui <-(fluidPage("Example",
leafletOutput("map"),
dataTableOutput("table")
)
)
# Server
server = (function(input, output) {
output$map <- renderLeaflet({
leaflet(shape) %>%
addProviderTiles("CartoDB.Positron") %>%
setView(-58.43152, -34.6052, zoom=11) %>%
addPolygons(stroke = T, fillOpacity = 0.65, smoothFactor = 0.5)
})
output$table <- renderDataTable({ as.data.frame(sheet) })
})
# Run the application
shinyApp(ui = ui, server = server)
私はまた、唯一のgooglesheetsを使用してアプリケーションを展開しているし、彼らが働きます。だから私は両方のパッケージを使用して、リーフレットのエラーを取得するときに何が起こっているのか分からない。
これは問題なくローカルで動作しますか? 'sessionInfo()'も表示してみてください。おそらく特定のバージョンの問題です。 –
FWIW、アルゼンチンのRDSファイルをダウンロードしましたが、ローカルで作業して公開しました。 –
それは働いた:https://mikewise2718.shinyapps.io/Argentina/。しかし、しばらく時間がかかります。 –