This example places the arrow at the end of the line. How can I place the arrow in the middle? Thank you!
b <- ggplot(mtcars, aes(wt, mpg)) + geom_point() df <- data.frame(x1 = 2.62, x2 = 3.57, y1 = 21.0, y2 = 15.0) b + geom_curve(aes(x = x1, y = y1, xend = x2, yend = y2, colour = "curve"), data = df) + geom_segment(aes(x = x1, y = y1, xend = x2, yend = y2, colour = "segment"), arrow = arrow(), data = df)
Edit: Can I remove the arrow in the
curve legend key on the right as well?