形状= 1的ggplot2 geom_point不显示圆圈

Question

我试图根据《经济学人》重制一个情节，得出了一个很好的结论。唯一不起作用的事实是，尽管我使用了以下代码，但数据点不是圆圈。

pl <- ggplot(df, aes(x=CPI, y=HDI, color = Region)) + 
  geom_point(size = 4, shape = 1) + 
  theme_economist_white()

我希望这里有人可以帮助我。