r - 在 ggplot 图形中使用 geom_point() 时如何获得填充点

Question

嗨，亲爱的，我正在处理两个连续变量。当我制作 ggplot 图形时，我使用了以下代码：

p4 <- ggplot(DataBase, aes(x=x, y=y))+xlab("Porcentaje de Tamaño Acumulado")+ylab("Porcentaje de Monto Acumulado")
p4 + geom_line(colour="darkblue",size = 1.5)+geom_point(colour = "red", size = 4,,shape=5)

我得到了这张照片：

点为空的地方。可以填充它们。我试过了，fill但我得到了同样的结果。谢谢。