いくつかのデータとその下のテーブルを使用して R でプロットを作成しようとしています。R では見栄えがしますが (写真 1)、写真をエクスポートすると (写真 2)、見栄えが悪く、同じ形式ではありません。
library(tidyverse)
library(cowplot)
p <- ggplot(iris, aes(Sepal.Length, Petal.Length, col = Species)) + geom_point()
info <- iris %>% group_by(Species) %>% summarise_all(mean)
table_plot <- tableGrob(info, theme = ttheme_default(base_size = 8), rows = NULL)
plot_total <- plot_grid(p, table_plot, nrow = 2, rel_heights = c(4 / 5, 1 / 5))
plot_total
save_plot("iris.png", plot_total)
