построение geom_text на отдельных позициях в каждом фасете facet_wrap

Значения будут перезаписывать друг друга. Каждая пара ключей и ключей уникальна для протокола и домена независимо от путей.

Измененный домен может быть изменен с помощью свойства document.domain.

  • sub.example.com -> example.com возможно (субдомен)
  • sub.example.com -> other.example.com невозможно
1
задан nouse 16 January 2019 в 18:24
поделиться

1 ответ

Вы можете определить новую переменную height, которая определяет высоту для нанесения меток:

library(tidyverse)

df %>% 
  group_by(types) %>% 
  mutate(height = max(values) + .3 * sd(values)) %>% 
  left_join(df.text, by = "groups") %>% 
  ggplot(aes(groups, values)) + 
  facet_wrap(~types, scale = "free") + 
  geom_point() +
  geom_text(aes(x = groups, y = height, label = label), size = 4, col = "red", stat = "identity") +
  theme_bw()

Здесь я использовал максимальное значение плюс .3 раза стандартное отклонение, но вы можете изменить его на любое Вы хотели, очевидно. Не уверен, как наклеить надписи на полоски панели.

0
ответ дан DiceboyT 16 January 2019 в 18:24
поделиться
Другие вопросы по тегам:

Похожие вопросы: