我有三个图保存到ET1,ET2和ET3,其中每个图绘制不同的y轴值,但都具有相同的x轴值。 y轴标签的长度不同,因此当保存为.png时,x轴日期的垂直线不会对齐
png(filename="C:/plotting/3_part_data/ET.png", width=650, height=850, units="px", res=100)
grid.arrange(ET1,ET2,ET3,ncol=1,nrow=3)
dev.off()
Current result of the plots;你可以看到三条垂直线不对齐的位置。
由于没有任何元素可以改变任何图表右侧的大小,我想知道在保存为.png时是否有一种方法可以将它们对齐在右侧?
感谢你指出另一个问题;这对我有用:
library(gtable)
# Start png
png(filename="C:/G.png", width=650, height=850, units="px", res=100)
# Get the ggplot grobs
gA <- ggplotGrob(ET1)
gB <- ggplotGrob(ET2)
gC <- ggplotGrob(ET3)
# Combine the plots
g = cbind.gtable(rbind.gtable(gA, gB, gC, size = "max"), size = "max")
# Draw it
grid.draw(g)