在 RMarkdown pdf 中對齊繪圖

Question

我正在嘗試在 RMarkdown 的 10x2 網格中安排 20 個類似的圖。

當我執行par(mfrow=c(10,2))時，控制台抱怨我的邊距太大。 我想這是因為，它試圖在一個區域內修復所有 20 個地塊，而不是把它們分解。 調整我的邊距讓 plot 太小了。

我試過使用 grid.arrange 和 plot_grid 無濟於事。 誰能告訴我如何把這段代碼變成一個 10 x 2 可讀的圖形網格？

for (i: 1:20){ plot(train[train$ID==i]$Date,train[train$ID==i]$Sales)}

Answer 1

您可以嘗試使用facet_wrap ：

library(ggplot2)
ggplot(train, aes(Date, Sales)) + geom_point() + facet_wrap(~ID, ncol = 2)