Общая легенда для нескольких сюжетов в R

Я использую R и Latex вместе, чтобы нарисовать некоторые сюжеты и пытаюсь сделать общую легенду для всех них.

У меня есть шесть отдельных участков на одной странице. Я сделал каждый график отдельно в R, а затем отобразил их на той же странице, используя \ includegraphics в Latex.

Каждый график имеет одинаковую информацию о легендах, поэтому вместо того, чтобы иметь легенду на каждом графике, я бы хотел, чтобы в нижней части страницы отображалась одна горизонтальная легенда. К сожалению, я не могу понять, как сделать легенду без сюжета. Как только у меня будет отдельное изображение для легенды, я буду знать, как добавить его внизу страницы, используя латекс.

Код, который я пытаюсь использовать, чтобы сделать легенду

<code>plot(1, type = "n", axes=FALSE, xlab="", ylab="")
plot_colors <- c("blue","black", "green", "orange", "pink")

legend(.6,1.3,legend = c("Fabricated Metal", "Iron and Steel", "Paper", 
"Beverages", "Tobacco"), 
       col=plot_colors, lwd=5, cex=.5, horiz = TRUE)
</code>

Но шрифт слишком маленький, и сторона поля легенды обрезана.

Ответы на вопрос(2)

Ваш ответ на вопрос