除了没有显示置信区间的事实之外,我的数据已正确绘制,并且对它的外观感到满意。这是我为提问准备的一些伪代码。
print (dfA)
month chicken turkey
0 1a 10 1
1 1b 20 2
2 1c 30 3
3 2a 11 101
4 2b 22 202
5 2c 33 303
产生以下结果:
我尝试过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')
,但是我为所有值生成文本,即使是不属于其各自网格的值也是如此。我该如何补救?我正在尝试在每个标签的文本中显示置信区间。
我尝试注释时产生的图像: