如何通过重叠要素分割多边形？

Question

如何将多个重叠的多边形划分为多个不重叠的多边形？这是一个示例：我想根据图像中的黄色长多边形与其他两个多边形的接触位置将其分为3个多边形。

library(spData)
library(sf)

seine_buff_5km = st_buffer(seine, dist = 5000)

tmap_mode("plot")
tm_shape(seine_buff_5km) +
  tm_fill( col = "name", alpha =.5) +
tm_shape(seine) +
  tm_lines() 

当然，我想对包含更多多边形的更大数据集执行此操作。我想这样做的一种方法是将一个sf对象中的所有多边形彼此相减。