Мой фрейм данных выглядит

df
   Group   value
1 Positive    52
2 Negative   239
3 Neutral     9

Я хотел бы сделать круговую диаграмму фрейма данных, используя ggplot.

pie <- ggplot(df, aes(x="", y=value, fill=Group)) +
       geom_bar(width = 1, stat = "identity") +
       coord_polar("y", start=0) 

Это моя круговая диаграмма.

Но когда я пытаюсь добавить процентные метки на графике

pie <- ggplot(df, aes(x="", y=value, fill=Group)) +
       geom_bar(width = 1, stat = "identity") +
       coord_polar("y", start=0) +
       geom_text(aes(y = value/2 + c(0, cumsum(value)[-length(value)]),
                 label = percent(value/300 )), size=5)

Это мой результат.

Я уже видел много таких же вопросов, как у меня, т.е.R + ggplot2 => добавить метки на круговую диаграмму фасетови решения не помогают.