R 如何在ggplot2中翻转几何图形曲线（箭头）？

我似乎不能使箭头凹进。我尝试过对

geom_曲线中的
angle
参数进行多次调整

可复制示例

上面的箭头是凸面的-目标是使箭头成为彩虹形状（凹面）。我已经改变了角度和起点/终点，但是所有的箭头仍然是凸面的

实例
这里的箭头指向条的粉红色部分-底部的箭头看起来不错，但是顶部的箭头如果可以做成凹面的话看起来会更好

我想您需要
曲率
参数。正值具有逆时针旋度，负值具有顺时针旋度。这是一个reprex：

库（ggplot2）
ggplot（）+
几何图形文本（aes（x=-5，y=5，label=“Some text”），大小=10，hjust=0）+
几何误差（aes（xmin=0，xmax=5，ymin=2.5，ymax=7.5））+
几何曲线（aes（x=-2.5，y=5.5，xend=-1.25，yend=6），
箭头=箭头（长度=单位（0.03，“npc”），type=“closed”），
color=“#EC7014”，尺寸=1.2，曲率=-0.3，角度=90）+
几何曲线（aes（x=-2.5，y=4.5，xend=-1.25，yend=4），
箭头=箭头（长度=单位（0.03，“npc”），type=“closed”），
color=“#EC7014”，尺寸=1.2，曲率=0.3，角度=90）


由（v0.3.0）于2020年5月9日创建

library(ggplot2)
library(dplyr)
set.seed(123)
data.frame(x = runif(200)* 1000, y = runif(200)* 1000) %>% 
  ggplot(aes(x, y)) +
  geom_point() + 
  geom_curve(
  aes(x = 200, y = 300, xend = 500, yend = 400),
  arrow = arrow(length = unit(0.03, "npc"), type="closed"), colour = "#EC7014", size = 1.2, angle = 90)