gpt4 book ai didi

r - 为 geom_segment 中的段添加边框

转载 作者:行者123 更新时间:2023-12-04 11:28:16 26 4
gpt4 key购买 nike

我想弄清楚如何更改使用 geom_segment 的甘特图的边框颜色.

这是一些数据:

df <- structure(list(start_int = c(0, 5, 0, 0, 9, 10, 12, 10, 14, 18, 
22, 24, 27, 29, 26), end_int = c(5, 6, 8, 9, 10, 12, 14, 15,
15, 20, 23, 27, 30, 31, 32), ids = c("C", "C", "A", "C", "B",
"B", "C", "A", "B", "C", "B", "B", "B", "B", "C")), .Names = c("start_int",
"end_int", "ids"), class = c("data.frame"), row.names = c(10L, 11L, 1L, 14L, 3L, 6L, 12L, 2L, 7L, 13L, 4L, 8L, 9L, 5L, 15L))

这是一个情节:
ggplot(df, aes(x=start_int, xend = end_int, y = ids, yend = ids)) + 
geom_segment(size = 10) +
theme_bw()

产生这个:

enter image description here

现在我该如何在每个段周围添加红色边框?

geom_segment这样做的方法,还是会 geom_rect更合适? (由于分类 y 轴,不确定它会起作用)。

最佳答案

您可以将“较小”的部分覆盖在“较大”的部分上:

ggplot() + 
geom_segment(data=df, aes(x=start_int, xend=end_int, y=ids, yend=ids), size=11, colour="red") +
geom_segment(data=df, aes(x=(start_int+0.1), xend=(end_int-0.1), y=ids, yend=ids), size=10) +
theme_bw()

overlaid segments

关于r - 为 geom_segment 中的段添加边框,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/28999894/

26 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com