在 Shiny 中使用 tmap 并排映射

如何解决在 Shiny 中使用 tmap 并排映射

我正在尝试使用 Shiny 中的 tmap 包比较两个专题地图。但是我得到了一个错误参数长度为零。另外我想从选择 Shinyinput 面板中绘制这两个地图。我的意思是从 4 个输入中可以绘制 4 个图的 2 个组合。当 input$hafta 的长度等于 2 时，必须绘制该图。我向您发送数据类型和我写的代码。

PS：我尝试在 tmap 中使用 facets，但是据我所知，shiny 不支持它。谢谢

which graph

str(turcov@data)

解决方法

#UI
tabPanel("İki hafta il sınıflandırma karşılaştırması",fluidRow(
                        column(6,tmapOutput("map1",width = "100%",height = 800)),column(6,tmapOutput("map2",height = 800))))
#SERVER
output$map1<-renderTmap({ 
breaks<-c(0,20,50,100,Inf)
renk=c("blue","yellow","orange","red")
tmap1<-tmap_mode("view")+
tm_shape(turcov) +
tm_fill(input$hafta[1],breaks = breaks,title=c(" İllere göre 100 binde vaka sayıları(input$hafta[1])"),palette = 
renk) +
tm_borders() +
tm_text("NAME_1")
output$map2<-renderTmap({ 
tmap1<-tmap_mode("view")+
tm_shape(turcov) +
tm_fill(input$hafta[2],palette = 
renk) +
tm_borders() +
tm_text("NAME_1")
})

好吧，只要我理解 Shiny 不支持 facets 类型的映射，我就根据 tmap 的建议通过将 plotouput 分成两列来进行单独绘图。这解决了我的问题。