Jak zmienić położenie legendy na podstawowych wykresach r

Istnieją dwa sposoby zmiany położenia legendy na podstawowych wykresach R:

Metoda 1: Użyj współrzędnych (x, y)

 legend( 4 , 12 , legend=c(' y1 ', ' y2 '), col=c(' purple ', ' red '), lty= 1 )

Metoda 2: Użyj słów kluczowych

 legend(' bottomright ', legend=c(' y1 ', ' y2 '), col=c(' purple ', ' red '), lty= 1 )

Za pomocą tej metody możesz określić następujące lokalizacje:

• „w prawym dolnym rogu”
• „w dół”
• „w lewym dolnym rogu”
• „LEWY”
• „w lewym górnym rogu”
• „wysoki”
• „w prawym górnym rogu”
• „PRAWIDŁOWY”
• „Centrum”

Poniższe przykłady pokazują, jak zastosować każdą metodę w praktyce.

Przykład 1: Zmień położenie legendy za pomocą współrzędnych (x, y).

Poniższy kod pokazuje, jak utworzyć legendę dla podstawowego wykresu R i umieścić ją w punktach x=4 i y=12:

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

Należy pamiętać, że legenda jest umieszczana dokładnie w określonych przez nas współrzędnych (x, y).

Przykład 2: Zmień pozycję podpisu za pomocą słów kluczowych

Poniższy kod pokazuje, jak utworzyć legendę dla podstawowego wykresu R i umieścić ją w lewym górnym rogu:

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

Legenda jest umieszczona w lewym górnym rogu wykresu, tak jak to określiliśmy.

Możemy łatwo przenieść go w inne miejsce, np. w prawy dolny róg, używając innego słowa kluczowego:

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

Legenda jest teraz umieszczona w prawym dolnym rogu wykresu.

Powiązane: Jak narysować legendę poza fabułą w R

Dodatkowe zasoby

Poniższe samouczki wyjaśniają, jak wykonywać inne typowe zadania w języku R:

Jak wykreślić wiele linii na wykresie w R
Jak narysować linię najlepszego dopasowania w R
Jak używać aline() w R