r - 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)

明确地说，我想最终得到如下所示的东西：

看起来这将是与第一个在同一平面上的另一个大圆弧，但我不知道如何绘制它。