tmap：将插图与 tmap_arrange

如何解决tmap：将插图与 tmap_arrange

如何使用 tmap 创建和保存插图在几个教程中都有介绍，例如here。但是，我想在 tmap_arrange 的帮助下将多个地图合并到一个文件中。据我了解，在 tmap 中创建插图的方式涉及使用 grid::viewport，它在现有图的顶部绘制附加对象。不幸的是，此方法似乎无法创建可在 tmap_arrange 命令中使用的命名 tmap-object。这只是我，还是我错过了什么？

library(sf)
library(tidyverse)
library(tmaptools)
library(tmap)
library(grid)
library(raster)

DE <- getData('GADM',country='DE',level=0) %>% 
  st_as_sf() %>% 
  tm_shape + 
  tm_polygons()

BAV <- getData('GADM',level=1) %>% 
  st_as_sf() %>% 
  filter(NAME_1 == "Bayern") %>% 
  tm_shape + 
  tm_polygons()

map_joined <- tmap_arrange(DE,BAV,ncol = 2)

BAV
print(DE,vp = viewport(0.85,0.8,width = 0.2,height = 0.2)) 

#map_inset_joined <- tmap_arrange(???,DE,ncol = 2) does not work!