Маркировка отдельных блоков в блок-графике ggplot

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

Коробка

код:

p1 <- ggplot(beta_data, 
             aes(x=reorder(interaction, distwu,FUN = median),
                            y=distwu, fill=interaction)) +
  geom_boxplot()+ 
  theme(legend.position="none", axis.text.x = element_text(angle = 45, hjust = 1))  +
  labs(x="Treatment interaction", y = "Distance to centroid") + 
  ylim(0,1.0)

r ggplot2 boxplot labeling
person Becca    schedule 29.12.2017    source источник
comment
Вам нужно будет создать дополнительный фрейм данных со следующими столбцами: 1. Элементы, перечисленные на оси x (назовите этот столбец x); 2. Значение y (которое будет верхним квартилем плюс значение, чтобы вытолкнуть его выше края поля — назовите этот столбец y); 3. Текст, который вы хотите отобразить для каждой точки на оси (назовите эту метку столбца). Затем вам нужно добавить в код ggplot следующий слой: geom_text(data = newdf, aes(x = x, y = y, label = label).   -  person Phil    schedule 30.12.2017

Ответы (1)


arrow_upward
2
arrow_downward

Упростите жизнь с автоматическим размещением от stat_summary. Вы не предоставили никаких данных, поэтому вот пример:

ggplot(mtcars, aes(factor(cyl), mpg)) +
  geom_boxplot() +
  stat_summary(geom = 'text', label = letters[1:3], fun.y = max, vjust = -1)

введите здесь описание изображения

person Axeman    schedule 30.12.2017