删除R中较大多边形内的小多边形

如何解决删除R中较大多边形内的小多边形

我从 attached raster 文件开始，它是 5 个气候区的世界地图。然后我将其转换为一个简单的功能。我的目标是摆脱包含在较大多边形中的那些小多边形，以便我只可视化五个不同区域的较大块的轮廓。作为奖励，让这些线条更平滑会很好，因为边缘在视觉上并不令人愉悦，但作为一个分类数量，我无法真正插入这些值。

library(stars)
x=read_stars('climi.tif')
#convert into sf
tes=st_as_sf(x,as_points=FALSE,merge=TRUE,use_integer=TRUE)
#load a simple background map
map.background=sf::st_as_sf(rworldmap::countriesCoarseLessIslands)
ggplot()+ geom_sf(data=map.background,size=0.1) +geom_sf(data=tes,aes(geometry=geometry,color=factor(climi.tif)),fill=NA,size=0.7)

我明白了，但是正如您所看到的，在非常大的多边形内有许多由几个像素组成的小多边形，这使可视化变得混乱。我想将这些小多边形与围绕它们的较大多边形合并。

我尝试计算面积并移除较小的多边形，然后使用 sf_remove_holes，这改善了结果，但我仍然得到太多应该着色的较小多边形或 NA 区域。

tes$area= st_area(tes);tes$area=as.numeric(tes$area)
subtes=subset(tes,tes$area>199426036400)
subtes=sfheaders::sf_remove_holes(subtes)

但是一些小多边形仍然可见，而且似乎有些区域似乎不属于任何区域。我也尝试过 st_contains 和 raster::clump() 但没有成功。例如，Clump 会删除五个类别之一。我想形成易于相互区分的连续区域，即使我必须绘制双边框。