gridExtra の grid.arrange を使用して図を作成し、.png ファイルに保存する前に、プロット全体にメイン タイトルを追加しようとしました。
引数の使用はmain="TITLE"
機能しますが、ダイアグラムを設定した高さに関係なく、上の境界線でフラッシュされます。
私の質問: メイン タイトルが上の境界線でフラッシュされないように設定するにはどうすればよいですか? 1 つの方法は、図全体に全体的なマージンを追加することですが、これも方法がわかりませんでした。
例として、グリッド配置から SandyMuspratt と Baptiste のコードを変更して、テーブルとグラフを 1 つの画像に配置しました。
library(ggplot2)
library(gridExtra)
x = read.table(text = "
1/1/2010 10
1/2/2010 20
1/3/2010 15
1/4/2010 56
1/5/2010 46
1/6/2010 15
1/8/2010 15
1/9/2010 15
1/10/2010 20
1/11/2010 15
1/12/2010 15
1/13/2010 40
1/14/2010 15
1/15/2010 15
1/16/2010 70", sep = "", header = FALSE)
p1<-ggplot(x, aes(V2, V1)) + geom_point()
p2<-tableGrob(x)
png( filename = "TEST.png", width = 1700, height = 900, units = "px")
grid.arrange(p2, p1, main=textGrob("Total Data and Image", gp=gpar(cex=3)),
ncol = 2,widths=unit.c(grobWidth(p2), unit(1,"npc") - grobWidth(p2)))
dev.off()
ボーダーでフラッシュされたタイトルを表示する PNG 出力:
解決策はかなり単純だと思いますが、オンラインで解決策を見つけることができないようです。?grid.arrange、grid.table プロットへのテキストの追加、およびその他の投稿を読みましたが、これについて言及したものはありません。
どんな助けでも大歓迎です、そして前もって感謝します!