ggplot在我的情节

Question

我的df：

   p1   p2 p3    x        y
    0 3000 14  0.0 0.026500
   20 3000 14 11.0 0.054000
   30 3000 14 17.9 0.057000
   60 3000 14 49.3 0.064000
   80 3000 14 77.4 0.063000
   60 3500 14 45.3 0.061000
   60 4000 14 41.4 0.058300
   60 4400 14 43.7 0.073600
   60 3500  9 41.7 0.060556
   60 3500 18 46.7 0.060700
   60 3500 21 49.2 0.059900

这是一次＆＃34;一个参数的结果＆＃34;实验设计，即参数p1，p2和p3一次改变一个（绝对不是DOE的最佳类型，但那是我得到的） ）。对于每个观察，测量两个变量x和y。我想绘制一条连接p1研究的所有点（前5行）的线，连接p2研究的所有点（第4和第6行：第8行）和第3行的线连接p3研究的要点（第6和9:11行）。我试过

ggplot(df, aes(x = x, y = y, color = p2)) +
  geom_point( aes(shape = p3)) + 
  geom_line() +
  geom_line(data = filter(df, p1 == "60" & p3 == "14"),  aes(x = x, y = y))

红线和绿线对应于p1和p3研究，但ggplot没有绘制与p2对应的线条。我怎样设法绘制它？在实践中，我需要geom_path或geom_line连接屏幕中心的三角形符号（x坐标在40到50之间）。