使用ggplot2在R中添加附加Y轴

假设我有以下x0，y0数据，我在左侧绘制了y0轴：

x0,y0
-----
500,1
200,3
...

此外，我还有另一组数据x1，y1，如下所示：

x1 y1
-----
1.5,1
3.2,2
...

我想在右侧添加一个附加的y1轴，它将x1作为断点，y1作为标签。x1和y0在同一尺度上，但这两个数据集的长度不同，并且没有可以用来从y0推导x1的公式

---

谢谢

还不完全清楚你在找什么。是这样的吗

df1 <- data_frame(x0 = c(500, 300),
              y0 = c(1, 3))

df2 <- data_frame(x1 = c(1.5, 3.2),
                  y1 = c(1, 2))

ggplot(df1, aes(x0, y0)) + geom_point() + 
  scale_y_continuous(expand = c(0.5,0.5),
                     sec.axis = sec_axis(trans = . ~ ., 
                                         breaks = df2$x1, labels = df2$y1))

---

谢谢，很有魅力。只有一个语法错误：“data_frame”，我认为应该是“data.frame”。data_frame是从包的tidyverse中的tibble和dplyr导出的，其中ggplot2是其中的一部分。我只是忘了在顶部包括library语句。