Выровняйте два объекта по верхнему краю с помощью gridExtra

Скажем, у вас есть два tableGrob разных размеров, и вы хотите, чтобы меньший grob был выровнен по верхнему краю. Как вы могли бы поступить?

Вот пример:


library(gridExtra)

t1 <- cars[1:9,]

t2 <- cars[10:14,]

grid.arrange(tableGrob(t1), tableGrob(t2), ncol = 2)

Как мы подтолкнем меньший стол вверх?


person Kene    schedule 28.08.2020    source источник


Ответы (1)


Вы можете использовать gtable_combine() из библиотеки (gridExtra) для выравнивания таблиц. Обратитесь к этой ссылке для дополнительного объяснения. https://mirror.its.dal.ca/cran/web/packages/gridExtra/vignettes/tableGrob.html

library(grid) 
library(gridExtra)
t1 <- cars[1:9,]
t2 <- cars[10:14,]
grid.arrange(gtable_combine(tableGrob(t1), tableGrob(t2), along=1), ncol = 1)
person Maad scientist    schedule 05.10.2020
comment
Добро пожаловать в Stack Overflow. Пожалуйста, отредактируйте свой ответ, чтобы объяснить, что делает этот код и как он отвечает на вопрос, чтобы он был полезен для OP как а также другие пользователи с похожими проблемами. Ответы, содержащие только код, не рекомендуются в Stack Overflow, поскольку они не объясняют, как это решает проблему. - person FluffyKitten; 05.10.2020
comment
Мои извинения. Обновлено! - person Maad scientist; 06.10.2020