將帶有 geom_seg 的線條添加到 R 中的堆疊條形圖中

Question

我正在嘗試向我創建的堆疊條形圖添加線條。

我一直在嘗試使用 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

Answer 1

如果要手動創建這些行，可以使用 geom_segment() function，它是 tidyverse package 的一部分。

下載 tidyverse package：

install.packages("tidyverse")

加載它：

load(tidyverse)

手動將所需的段（線）插入 plot 以連接堆疊條的不同元素。

輸入以下內容以獲取有關如何使用 geom_segment() 的幫助：

?geom_segment

這是一個如何使用它的簡單示例。 假設您想要一個從坐標 (3,4) 到 (5,6) 的基本段：

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