Ярлыки не выравниваются правильно на 12 фигурах панели с помощью Cowplot - plot.grid

Question

Когда я создаю 12-ти панельную фигуру (3 строки по 4 столбца), используя plot_grid в Cowplot, метки в третьей строке не выравниваются с другими после " hjust = -6 ". Пожалуйста, помогите с позициями этикеток в третьем ряду. Спасибо за помощь.

PP1 <- ggplot(mpg, aes(x = cty, y = hwy, colour = factor(cyl))) + 
geom_point(size = 2.5) 
. 
. 
. 

PP12 <- ggplot(mpg, aes(x = cty, y = hwy, colour = factor(cyl))) + 
geom_point(size = 2.5) 



plot3by4 <- plot_grid(PP1, PP2, PP3, PP4, 
        PP5, PP6, PP7, PP8, PP9, PP10, PP11, PP12, 
        labels=c("A", "B", "C", "D","E", "F", "G", "H", "I", "J", "K", "L"), 
        ncol = 4, nrow = 4, align = 'v', 
        hjust=-6, label_size=17) 

save_plot("plot3by4.png", plot3by4, 
     ncol = 4, 
     nrow = 4, 
     base_aspect_ratio = 1 
) 

Answer 1

hjust для регулировки положения участка этикетки.

Используйте align = 'vh' (вертикальный и горизонтальный), чтобы выровнять участки друг с другом.

labels = c(LETTERS[seq(1,12)]) также хорошо.