Как правильно аннотировать мой лесной участок так, чтобы он отображал мои доверительные интервалы рядом с соответствующими ярлыками?
Я правильно построил свои данные и доволен тем, как они выглядят, за исключением того факта, что доверительные интервалы вообще не отображаются. Вот некоторый фиктивный код, который я придумал ради своего вопроса.
library('ggplot2')
blee = rnorm(14)
blarg = rnorm(14)
bloo = (letters[1:14])
low = blee - 1.96 * blarg
up = blee + 1.96 * blarg
knobs = (rep(LETTERS[1:2],7))
df <- data.frame(blee, blarg, bloo, low, up, knobs)
p1 <- ggplot(data = df, aes(x = reorder(bloo, blee), y = blee, ymin = low, ymax = up))
geom_pointrange() +
geom_hline(yintercept = 0, lty = 2) +
coord_flip() +
xlab('label') +
ylab(NULL) +
theme_bw() +
scale_y_discrete(limits = c(-5, 5)) +
facet_grid(knobs ~ ., scales = 'free', space = 'free')
что дает следующее:
я пробовал p1 + annotate('text', x = bloo, y = 1, label = 'test') но я даю текст для всех значений, даже тех, которые не принадлежат их соответствующей сетке. Как мне исправить это? Я пытаюсь отобразить доверительные интервалы в тексте для каждого отдельного ярлыка.
Изображение того, что получается, когда я пытаюсь комментировать:
