how to add count to pie chart legend

Hi Ana,
A lot of work for a little pie.

df<-read.table(text="V1 n
 Yes 8
 No 14",
 header=TRUE,
 stringsAsFactors=FALSE)
par(mar=c(5,4,4,4))
pie(df$n,df$V1,col=c(3,2),main="Yes and No",
 xlab="",ylab="",radius=1)
legend(0.75,-0.8,paste(df$V1,df$n),fill=c(3,2),
 xpd=TRUE)

Jim

On Tue, Aug 16, 2022 at 1:59 AM Ana Marija <sokovic.anamarija at gmail.com> wrote:

Hi All,

I have df like this:

df# A tibble: 2 ? 4

  V1        n  perc labels
  <chr> <int> <dbl> <chr> 1 Yes       8 0.364 36%   2 No       14 0.636 64%

I am making pie chart like this:

library(ggplot2)

ggplot(df, aes(x = "", y = perc, fill = V1)) +
  geom_col(color = "black") +
  geom_label(aes(label = labels),
             position = position_stack(vjust = 0.5),
             show.legend = FALSE) +
  guides(fill = guide_legend(title = "Answer")) +
  coord_polar(theta = "y") +
  theme_void()

How would I add in the legend beside Answer "Yes" count 8 (just number
8) and beside "No" count 14?

Thanks

Ana

        [[alternative HTML version deleted]]