R地图和地圈：连接城市而不越过国际日期

Question

我找到了这个很棒的教程，介绍如何使用地图和地球圈在R中使用大圆圈连接地图上的点：

https://flowingdata.com/2011/05/11/how-to-map-connections-with-great-circles/

如果这些线条离开地图的边缘（越过国际日期线），是否有办法让线条走另一条路：

对于将DC连接到北京的线路，我目前的代码如下所示：

library(maps) 
library(geosphere)

map("world")

lat_ca <- 38.89511
lon_ca <- -77.03637
lat_me <- 39.917
lon_me <- 116.383
inter <- gcIntermediate(c(lon_ca, lat_ca), c(lon_me, lat_me), n=50, addStartEnd=TRUE)# breakAtDateLine=TRUE) 


lines(inter)

要清楚，我想最终看到这样的东西：

看起来这将是与第一个同一平面上的一个大圆的另一个弧，但我无法弄清楚如何绘制它。