将带有geom_seg的线添加到R中的堆叠条形图中

时间:2019-09-24 15:11:08

标签: r ggplot2

我正在尝试向创建的堆叠Barplot中添加行。

我一直在尝试使用geom_segment进行此操作,首先创建一个data.frame,然后添加每个段的起点和终点,但是效果并不理想。

这是我的代码,未尝试添加行:

ggplot(d3, aes(x = factor(interact), y = percent, fill = factor(mrs_d90d_c))) +
    geom_bar(stat="identity", width = 0.7) +
    coord_flip() +
    scale_y_continuous() +
    labs(x = "VSS Dichotomized 0=control, 1=intervention", y = "percent", 
    fill = "MRS at 90 days")  

更具体地说,我试图分别在底部两个和顶部两个条形图的不同元素之间画线。这是期望的结果: https://i.stack.imgur.com/AONdy.png

链接到示例数据:https://pastebin.com/7yeWN5Qy

1 个答案:

答案 0 :(得分:0)

如果要手动创建这些行,可以使用tidyverse包中的geom_segment()函数。

下载tidyverse软件包:

install.packages("tidyverse")

将其加载到:

load(tidyverse)

将所需的线段(线)手动插入到绘图中,以连接堆叠条形图的不同元素。

输入以下内容以获取有关如何使用geom_segment()的帮助:

?geom_segment

这是如何使用它的简单示例。假设您想要一个从(3,4)到(5,6)坐标的基本线段:

geom_segment(aes(x = 3, y = 4, xend = 5, yend = 6), size = 1)