Come modificare la posizione della legenda nei grafici r di base

Esistono due modi per modificare la posizione della legenda nei grafici R di base:

Metodo 1: utilizza le coordinate (x,y)

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

Metodo 2: utilizzare parole chiave

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

Utilizzando questo metodo è possibile specificare le seguenti posizioni:

• “in basso a destra”
• “giù”
• “in basso a sinistra”
• “SINISTRA”
• “nell’angolo in alto a sinistra”
• “alto”
• “in alto a destra”
• “GIUSTO”
• “centro”

Gli esempi seguenti mostrano come utilizzare ciascun metodo nella pratica.

Esempio 1: modificare la posizione della legenda utilizzando le coordinate (x,y).

Il codice seguente mostra come creare una legenda per un grafico base R e posizionarla in x=4 e 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 ) 

Tieni presente che la legenda è posizionata alle coordinate esatte (x,y) che abbiamo specificato.

Esempio 2: modifica la posizione della didascalia utilizzando parole chiave

Il codice seguente mostra come creare una legenda per un grafico base R e posizionarla nell’angolo in alto a sinistra:

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

La legenda è posizionata nell’angolo in alto a sinistra del grafico, come abbiamo specificato.

Possiamo facilmente spostarlo in una posizione diversa, ad esempio nell’angolo in basso a destra, utilizzando una parola chiave diversa:

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

La legenda è ora posizionata nell’angolo in basso a destra della trama.

Correlato: Come disegnare una legenda al di fuori di una trama in R

Risorse addizionali

I seguenti tutorial spiegano come eseguire altre attività comuni in R:

Come tracciare più linee in un grafico in R
Come tracciare la linea di miglior adattamento in R
Come usare aline() in R