ggplot2地图-坐标不正确

Question

我有一幅俄罗斯地区的地图，除了一个巨大的例外，它运行良好

library(dplyr)
library(ggplot2) 
library(raster)
library(rgeos)
russian_map <- getData("GADM", country = "RUS", level = 1)
russia_1 <-  spTransform(russian_map, CRS(my.CRS))
russia_1.simp <- gSimplify(russian_map, tol=1, topologyPreserve=TRUE) %>%
  SpatialPolygonsDataFrame(data=russian_map@data)
map = fortify(russia_1.simp)
ggplot() +
  geom_polygon(
    data = russia_1.simp,
    aes(x = long, y = lat, group = group),
    fill = "lightblue",
    color = "grey20",
  ) + coord_map()+theme_minimal()

生成的俄罗斯地图向右移动，分为两半（见图）。我在做什么错了？