R 叠加两个图，一个带翻转坐标，ggplot

我试图覆盖两个相似的图形，但其中一个有“翻转坐标”，在另一个上面

我想画一个对称问题的“最佳响应”函数。所以我对这两个图有相同的数据框，只是其中一个需要翻转

添加

coord\u flip（）

将翻转“两个图形”的坐标

考虑以下数据：

df1 <- data.frame(
  x=c(0.000, 0.111, 0.222, 0.333, 0.444, 0.556, 0.667, 0.778, 0.889, 1.000),
  y=c(0.222, 0.111, 0.111, 0.000, 0.000, 1.000, 1.000, 0.889, 0.889, 0.778)
  )

这不是我想要的结果

以下是我是如何做到的

library(ggplot2)

df1 <- data.frame(x = seq(2, 8, by = 2),
              y = seq(30, 15, by = -5))

ggplot(df1)+ 
geom_line(aes(x,log(y)),color="black")+
geom_line(aes(log(y),x),color="red")

库（ggplot2）
df1在按照所需顺序对数据集的行进行排序后，您可以使用
geom_path
而不是
geom_line
作为翻转行。从
？几何路径
：

geom_path（）
出现在数据中
geom_line（）
按
x轴上的变量

谢谢安德鲁。这不能完成我想要的工作，因为它不能正确连接点（在我正在处理的另一个示例中）。我需要的是翻转图表。我不确定这是否足够清楚，或者我应该写一个更完整的问题。在我看来，安德鲁的回答适合你发布的问题，因此如果你的问题比这更详细，也许你可以在你的问题中包含一些细节。我不确定我是否理解。
geom_线（aes（log（y），x），color=“red”）
是否不会导致
coord_flip（）
？我已经更改了问题，以显示我真正想要做的事情。抱歉说不清楚。
library(ggplot2)

df1 <- data.frame(x = seq(2, 8, by = 2),
              y = seq(30, 15, by = -5))

ggplot(df1)+ 
geom_line(aes(x,log(y)),color="black")+
geom_line(aes(log(y),x),color="red")

library(dplyr)

df1 %>%
  arrange(x, y) %>%
  ggplot()+ 
  geom_line(aes(x, y), color = "black")+
  geom_path(aes(y, x), color = "red")