如何根据数据框在ggplot中插入箭头？

Question

我有一个如下数据框：

l <- c("a", "b", "c", "d")
x <- c(1, 2, 3, 4)
y <- c(4, 3, 2, 1)
df <- data.frame(l, x, y)

我正在尝试使用ggplot创建一个绘图，该绘图具有从绘图中心（0,0）到x和y指定的坐标的箭头，并且在箭头的末尾带有l的标签。

我想避免不得不单独插入每个点，geom_segments就是这种情况。

谢谢。