Как увеличить размер таблицы, чтобы она занимала все доступное пространство в... то есть, чтобы не было пробелов.
Кроме того, как вы удаляете имена строк таблицы?
Спасибо
dat = data.frame(x = c(1,2,4), y = c(12,3,5),z = c(5,6,7))
p =ggplot(dat, aes(x=x, y = y))+geom_point()+geom_line()
library(gridExtra)
t = tableGrob(dat)
rownames(t) =NULL
t$widths <- unit(rep(1/ncol(t), ncol(t)), "npc")
grid.arrange(t, p,p,nrow = 1)
Я обновил ваш код. Важными частями являются опция rows = NULL для tableGrob и настройка t$heights. Вероятно, вам нужно настроить это, чтобы получить что-то на свой вкус.
library(gridExtra)
library(ggplot2)
dat <- data.frame(x = c(1, 2, 4), y = c(12, 3, 5), z = c(5, 6, 7))
p <- ggplot(dat, aes(x = x, y = y)) +
geom_point() +
geom_line()
t <- tableGrob(dat, rows = NULL) # notice rows = NULL
t$widths <- unit(rep(1 / ncol(t), ncol(t)), "npc")
t$heights <- unit(rep(1 / nrow(t), nrow(t)), "npc") # new
grid.arrange(t, p, p, nrow = 1)
