gridExtraを使用してテーブルを拡張する

Question

テーブルのサイズを増やして空きスペースがないようにするにはどうすればよいですか。

また、テーブルの行名を削除するにはどうすればよいですか？

あなたは

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) 

Answer 1

私はあなたのコードを更新しましたありがとうございました。重要な部分はtableGrobへのrows = NULLオプションと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)