使用 rot = on grid.arrange 旋转标签不起作用

Question

我试图旋转我的 grid.arrange 面板图上的标签之一，使其看起来像所有三个图的轴，但使用我在网上找到的方法不起作用。

当我使用 textGrob 控制字体大小（我需要为 24）时，使用这段代码，我得到了这个数字。我正在插入 rot= 90 参数，但它对图形没有任何作用。

grid.arrange(d.a.plot1, d.b.plot1, d.c.plot1, ncol = 1, left = textGrob("Probability of remaining availabile", gp=gpar(fontsize=24, rot = 90)), bottom = textGrob("Depth(cm)", gp=gpar(fontsize = 24)))

当我使用标准 grid.arrange 代码使用下面的代码添加旋转标签时，位置没问题，但是我无法调整字体。

grid.arrange(d.a.plot1, d.b.plot1, d.c.plot1, ncol = 1, left = "Probability of remaining availabile", bottom = textGrob("Depth(cm)", gp=gpar(fontsize = 24)))

Answer 1

你只需要从gpar中取出rot = 90然后直接传递给textGrob:

# Simulate the plot grobs:
f <- function() cowplot::as_grob(~plot(rnorm(100), rnorm(100)))

grid.arrange(f(), f(), f(), ncol = 1,
            left = textGrob("Probability of remaining availabile", rot = 90, 
                            gp = gpar(fontsize=24)), 
            bottom = textGrob("Depth(cm)", gp=gpar(fontsize = 24)))

使用 rot = on grid.arrange 旋转标签不起作用

Rotating label using rot = on grid.arrange not working

grid

plot

r

ggplot2