r - ggplot2:将一行放在前面，但保存颜色

Question

考虑以下代码:

library(ggplot2)
foo <- data.frame(x=1:10,A=1:10,B=10:1)
ggplot(melt(foo,id.vars="x"),aes(x,value,color=variable))+geom_line(size=5)

我想将红线 (A) 放在 B 顶部的前面(参见交叉点)，而它们在图例中出现的颜色和顺序不会改变。有什么办法吗？

Answer 1

试试这个，

last_plot() + aes(group=rev(variable))