R - построить гладкий круг на карте мира

Question

Я пытаюсь построить круговые диаграммы на карте мира. Это упрощенный пример моего кода:

library(rworldmap)
library(ggplot2)
library(scatterpie)

WorldData <- map_data('world') 
toPlot <- data.frame(long = 0, lat = 0, r = 20, A = 5, B = 2, C = 10 )

dev.new();
ggplot( ) + 
  geom_polygon( data =  map_data('world') , aes(long, lat, group = group),
                fill = 'black', colour = 'grey', size=0.5 ) + 
  coord_fixed(1.3) + 
  
  geom_scatterpie(aes(x=long, y=lat, r=r ), 
                data = toPlot , cols=c("A", "B", "C"),
                color=NA, alpha=1, n = 1000 , linetype = 2 ) +
  theme(legend.position = 'none')

Проблема в том, что диаграмма выглядит очень грубо. Я попытался изменить количество точек, используемых для рисования полного круга (унаследованного от geom_arc_bar) и тип линии, но, похоже, это не имело никакого эффекта.

Как мне сделать его более гладким?