Use ggfittext with coord_polar() about ggfittext

[wilkox]

Polar coordinates don't really work with geom_bar_text() yet, but you can get the same effect with geom_fit_text():

library(tidyverse)
library(ggfittext)

df <- data.frame(trt = c("a", "b", "c"), outcome = c(2.3, 1.9, 3.2))

ggplot(df, aes(x = trt, y = outcome)) +
  geom_col() +
  geom_fit_text(aes(ymin = 0, ymax = outcome, label = outcome), place = "top") +
  coord_polar()

^{Created on 2020-02-21 by the reprex package (v0.3.0)}