So ändern sie die position der legende in einfachen r-plots
Es gibt zwei Möglichkeiten, die Position der Legende in einfachen R-Diagrammen zu ändern:
Methode 1: Koordinaten (x,y) verwenden
legend( 4 , 12 , legend=c(' y1 ', ' y2 '), col=c(' purple ', ' red '), lty= 1 )
Methode 2: Verwenden Sie Schlüsselwörter
legend(' bottomright ', legend=c(' y1 ', ' y2 '), col=c(' purple ', ' red '), lty= 1 )
Mit dieser Methode können Sie die folgenden Speicherorte angeben:
- „unten rechts“
- „runter“
- „unten links“
- „LINKS“
- „in der oberen Ecke links“
- „hoch“
- „oben rechts“
- „RECHTS“
- „Center“
Die folgenden Beispiele zeigen, wie die einzelnen Methoden in der Praxis angewendet werden.
Beispiel 1: Legendenposition mithilfe von (x,y)-Koordinaten ändern
Der folgende Code zeigt, wie Sie eine Legende für ein Basis-R-Diagramm erstellen und bei x=4 und y=12 platzieren:
#createdata x <- 1:10 y1<- c(3, 6, 8, 7, 8, 9, 13, 12, 10, 10) y2 <- c(1, 3, 3, 4, 6, 7, 8, 10, 9, 9) #create plot with multiple lines plot(x, y1, col=' purple ', type=' l ', xlab=' x ', ylab=' y ') lines(x, y2, col=' red ') #add legend legend( 4 , 12 , legend=c(' y1 ', ' y2 '), col=c(' purple ', ' red '), lty= 1 )
Beachten Sie, dass die Legende genau an den von uns angegebenen (x,y)-Koordinaten platziert wird.
Beispiel 2: Ändern Sie die Position der Beschriftung mithilfe von Schlüsselwörtern
Der folgende Code zeigt, wie Sie eine Legende für ein Basis-R-Diagramm erstellen und in der oberen linken Ecke platzieren:
#create data x <- 1:10 y1<- c(3, 6, 8, 7, 8, 9, 13, 12, 10, 10) y2 <- c(1, 3, 3, 4, 6, 7, 8, 10, 9, 9) #create plot with multiple lines plot(x, y1, col=' purple ', type=' l ', xlab=' x ', ylab=' y ') lines(x, y2, col=' red ') #add legend legend(' topleft ', legend=c(' y1 ', ' y2 '), col=c(' purple ', ' red '), lty= 1 )
Die Legende wird, wie von uns angegeben, in der oberen linken Ecke des Diagramms platziert.
Mit einem anderen Schlüsselwort können wir es ganz einfach an eine andere Stelle verschieben, beispielsweise in die untere rechte Ecke:
#create data x <- 1:10 y1<- c(3, 6, 8, 7, 8, 9, 13, 12, 10, 10) y2 <- c(1, 3, 3, 4, 6, 7, 8, 10, 9, 9) #create plot with multiple lines plot(x, y1, col=' purple ', type=' l ', xlab=' x ', ylab=' y ') lines(x, y2, col=' red ') #add legend legend(' bottomright ', legend=c(' y1 ', ' y2 '), col=c(' purple ', ' red '), lty= 1 )
Die Legende wird nun in der unteren rechten Ecke des Diagramms platziert.
Verwandte Themen: So zeichnen Sie eine Legende außerhalb einer Handlung in R
Zusätzliche Ressourcen
In den folgenden Tutorials wird erläutert, wie Sie andere häufige Aufgaben in R ausführen:
So zeichnen Sie mehrere Linien in einem Diagramm in R
Wie zeichnet man die beste Anpassungslinie in R?
So verwenden Sie aline() in R