从 ggplot2 中的错误栏中删除端点
Remove endpoints from error bars in ggplot2
我的目标是在 R 中创建箱线图(不必与 ggplot2 一起使用,但这就是我现在使用的),在风格上与我在某处找到的这个示例(减去文本)相似:
这是我目前的代码:
dat <- read.table(file = "https://www.dropbox.com/s/b59b03rc8erea5d/dat.txt?dl=1", header = TRUE, sep = " ")
library(ggplot2)
p <- ggplot(dat, aes(x = Subscale, y = Score, fill = Class))
p + stat_boxplot(geom = "errorbar", width = 1.2, size = 2.5, color = "#0077B3") +
geom_boxplot(outlier.shape = NA, coef = 0, position = position_dodge(.9)) +
scale_fill_manual(values = c("#66CCFF", "#E6E6E6")) +
theme(panel.background = element_rect(fill = "white", color = "white"))
这导致:
显然,我所拥有的与示例显示的有很多差异,但现在我只专注于从错误栏中删除端点,我的意思是创建的水平顶部和底部通过 stat_boxplot
函数。有谁知道我可以达到预期效果的方法吗?
errorbar
geom 中的 width
控制水平端条的宽度,因此将其设置为 0 以删除端条。您缺少 stat_boxplot
层中的闪避,因此您可以添加它以正确闪避误差线。
ggplot(dat, aes(x = Subscale, y = Score, fill = Class)) +
stat_boxplot(geom = "errorbar", width = 0, size = 2.5,
color = "#0077B3", position = position_dodge(.9)) +
geom_boxplot(outlier.shape = NA, coef = 0, position = position_dodge(.9)) +
scale_fill_manual(values = c("#66CCFF", "#E6E6E6")) +
theme(panel.background = element_rect(fill = "white", color = "white"))
我的目标是在 R 中创建箱线图(不必与 ggplot2 一起使用,但这就是我现在使用的),在风格上与我在某处找到的这个示例(减去文本)相似:
这是我目前的代码:
dat <- read.table(file = "https://www.dropbox.com/s/b59b03rc8erea5d/dat.txt?dl=1", header = TRUE, sep = " ")
library(ggplot2)
p <- ggplot(dat, aes(x = Subscale, y = Score, fill = Class))
p + stat_boxplot(geom = "errorbar", width = 1.2, size = 2.5, color = "#0077B3") +
geom_boxplot(outlier.shape = NA, coef = 0, position = position_dodge(.9)) +
scale_fill_manual(values = c("#66CCFF", "#E6E6E6")) +
theme(panel.background = element_rect(fill = "white", color = "white"))
这导致:
显然,我所拥有的与示例显示的有很多差异,但现在我只专注于从错误栏中删除端点,我的意思是创建的水平顶部和底部通过 stat_boxplot
函数。有谁知道我可以达到预期效果的方法吗?
errorbar
geom 中的 width
控制水平端条的宽度,因此将其设置为 0 以删除端条。您缺少 stat_boxplot
层中的闪避,因此您可以添加它以正确闪避误差线。
ggplot(dat, aes(x = Subscale, y = Score, fill = Class)) +
stat_boxplot(geom = "errorbar", width = 0, size = 2.5,
color = "#0077B3", position = position_dodge(.9)) +
geom_boxplot(outlier.shape = NA, coef = 0, position = position_dodge(.9)) +
scale_fill_manual(values = c("#66CCFF", "#E6E6E6")) +
theme(panel.background = element_rect(fill = "white", color = "white"))