R中的几个段的图，在ggplot之后有部分共同的图例

Question

说我有以下数据框：

line_df <- data.frame(x_ini = c(0.55,2.55,1.55,5.55,7.55),
x_end = c(1.45,3.45,2.45,6.45,8.45),
y = c(-0.5,-0.5,-1.5,-2.5,-2.5),
category = c("red","red","blue","green","green"))

我想为数据帧的每一行绘制一个水平段，其极限为(x_ini[i],y[i])和(x_end[i],y[i])，图例由line_df$category给出。

我已经尝试过使用geom_segment，segments，abline和lines，但我无法通过相同的指令正确设置图例并绘制线段。我在用另一个数据帧的ggplot完成绘制后得到了它（因此不在plot指令之后），看来这也引起了我的问题。

关于如何执行此操作的任何建议？很高兴将数据帧修改为其他更合适的结构，但是我想避免为每个段重复调用同一条指令。

谢谢！

Answer 1

我想如果您为“行”添加字段，您可以做到-这是您的意思吗？

ggplot(line_df) +
  geom_segment(aes(x = x_ini, xend = x_end, y = y, yend = y, 
                   group = row, color = category), size = 2) +
  scale_color_manual(values = c("lightblue", "seagreen", "firebrick"))