Ich benutze R und Latex zusammen, um einige Handlungen zu zeichnen und versuche, für alle eine gemeinsame Legende zu erstellen.

Ich habe sechs separate Diagramme auf derselben Seite. Ich habe jede Zeichnung in R separat erstellt und sie dann auf derselben Seite mit \ includesegraphics in Latex angezeigt.

Jedes Diagramm enthält die gleichen Legendeninformationen. Daher möchte ich anstelle einer Legende in jedem Diagramm eine horizontale Legende unten auf der Seite anzeigen. Leider kann ich nicht herausfinden, wie man eine Legende ohne eine Handlung macht. Sobald ich ein separates Bild für die Legende habe, kann ich es mit Latex am Ende der Seite einfügen.

Der Code, den ich versuche, um die Legende zu machen, ist

<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>

Die Schrift ist jedoch zu klein und die Seite des Legendenfelds ist abgeschnitten.