三个共享轴的图

Question

我需要制作一个由三个图形组成的图形，这三个图形共享相同的X轴但具有单独的Y轴。这是可以在R中做的，还是我需要制作三个独立的图表并将它们放在像Adobe Illustrator这样的程序中？

Answer 1

使用ggplot2

library(ggplot2)

ggplot(mtcars, aes(x = wt, y = mpg)) + 
  geom_point() + 
  facet_grid(cyl ~ ., scales = "free_y") + 
  theme_bw()

Answer 2

使用基础包中的绘图，您可以使用。在1个窗口中放置多个图形 par命令。不只是在关闭第一个轴上的轴时添加图形。我建议阅读绘图和图形文档以了解您可以调整以使绘图看起来很好。

#############
# Data 
  x<-1:10
  y<- 1+ x*1.2
#############
par(mfrow=c(3,1)) # allow 3 graphs in the plot window 3 rows, 1 column
# plot 1
plot(x,y, axes=F, xlab=NA, ylab=NA)   
box()
axis(2,seq(min(y), max(y),1), las=2)
# plot 2
plot(x,y, axes=F, xlab=NA, ylab="Y")  
box()
axis(2,seq(min(y), max(y),1), las=2)
# plot 3
plot(x,y, axes=T, xlab="X", ylab=NA)  
box()
axis(2,seq(min(y), max(y),1), las=2)