library(tmap)
library(sf)
tmap_mode("view") # interactive; "plot" for static print output
gpkg <- "data/vector-deepdive/swissboundaries3d_2024-01_2056_5728/swissBOUNDARIES3D_1_5_LV95_LN02.gpkg"
cantons <- st_read(gpkg, "tlm_kantonsgebiet")
tm_shape(cantons) +
tm_polygons(fill = "kantonsflaeche")