我想在我的ggplot中添加额外的行

Question

我构建了这个图并使用以下R代码

 ggplot(data = sc, aes(x = x, y = y))
+ geom_polygon(aes(fill = fill)) 
+ geom_point(data = leeu, aes(x = x, y = y)) 
+ coord_cartesian(xlim = c(-1000, 1000), ylim = c(-100, 1200))

但我想添加黑线，如下图所示。

线条从圆心开始，穿过每个黑点。我该如何构建线？