我怎么能用两个不同的y轴来画图呢？

Question

我怎么能用两个不同的y轴来画图呢？我想在R中叠加两个散点图，这样每一组点都有自己的(不同的)y轴(即在图的位置2和4中)，但是这些点似乎叠加在相同的图形上。能不能用plot?编辑显示问题的示例代码# example code for SO questiony1 <- rnorm(10, 100, 20)y2 <- rnorm(10, 1, 1)x <- 1:10# in this plot y2 is plotted on what is clearly an inappropriate scaleplot(y1 ~ x, ylim = c(-1, 150))points(y2 ~ x, pch = 2)

Answer 1

一个选择是并排画两个情节。ggplot2提供了一个很好的选项facet_wrap():

dat <- data.frame(x = c(rnorm(100), rnorm(100, 10, 2))
  , y = c(rnorm(100), rlnorm(100, 9, 2))
  , index = rep(1:2, each = 100)
  )require(ggplot2)ggplot(dat, aes(x,y)) + geom_point() + facet_wrap(~ index, scales = "free_y")