[1] data <- pivot_longer(AveMinsPie, cols = everything())
    [2] ggplot(data, aes(x="", y=value, fill = name)) +
            geom_bar(stat="identity", width=1) +
            coord_polar("y", start=0)+
            theme_void()

[1] Would spit outa tibble with a name and a value column.

[2] Would, of course, spit out your pie chart