小编Har*_*ted的帖子

我正在尝试在 R 中创建一个甘特图，其中我可以在同一个图表上将实际开始和实际完成与建议开始和建议完成的时间线进行比较。因此，y 轴会显示两次“仓库”，然后 x 轴将显示每个时间间隔的分段。

下面是我用来尝试此操作的代码，但它显然不起作用。

一如既往，我感谢任何和所有的帮助。谢谢。

library(tidyverse)


project_data <- tibble(
  Project_Name = c("Warehouse"),
  Proposed_Start = c("05-01-2022"),
  Proposed_Finish = c("12-01-2022"),
  Actual_Start = c("07-01-2022"),
  Actual_Finish = c("12-31-2022")
)


project_data %>%
      ggplot() +
        aes(x = Proposed_Start, xend = Proposed_Finish,
            y = Project_Name, yend = Project_Name,
            color = "green") +
        geom_segment(size = 8) +
        aes(x = Actual_Start, xend = Actual_Finish,
            y = Project_Name, yend = Project_Name,
            color = "red") +
        geom_segment(size = 8) +
        labs(title = "Comparing Project Proposed and Actual Dates", …