how to merge polygons in ggplot2?

tidyverse
1

I would like to merge some polygons together

  1. Morocco with Western Sahara
  2. Sudan with South Sudan
map_data('world')
2

library(ggplot2)
library(dplyr)

world_map <- map_data("world")

merged_map <- world_map |>
mutate(region = case_when(
region %in% c("Morocco", "Western Sahara") ~ "Morocco",
region %in% c("Sudan", "South Sudan") ~ "Sudan",
TRUE ~ region
))

ggplot(merged_map, aes(x = long, y = lat, group = group, fill = region)) +
geom_polygon(color = "black") +
coord_fixed() +
theme_minimal()