Comment ajouter une étiquette à abline dans R (avec exemples)

La fonction abline() dans R peut être utilisée pour ajouter une ligne droite à un tracé dans R.

Pour ajouter une étiquette à un abline, vous pouvez utiliser la fonction text() avec la syntaxe de base suivante :

texte(x, y, ‘mon étiquette’)

où:

• x, y : Les coordonnées (x, y) où l’étiquette doit être placée.

Les exemples suivants montrent comment utiliser la fonction text() pour ajouter une étiquette à une abline horizontale et verticale.

Exemple 1 : Ajouter une étiquette à l’abline horizontale dans R

Le code suivant montre comment créer un nuage de points avec une ligne horizontale à y=20 et une étiquette :

#create data frame
df <- data.frame(x=c(1, 1, 2, 3, 4, 4, 7, 7, 8, 9),
                 y=c(13, 14, 17, 12, 23, 24, 25, 28, 32, 33))

#create scatterplot of x vs. y
plot(df$x, df$y, pch=19)

#add horizontal line at y=20
abline(h=20)

#add label to horizontal line
text(x=2, y=20.5, 'This is a label')

Notez qu’une étiquette a été ajoutée juste au-dessus de l’abline horizontale dans le tracé.

Notez également que vous pouvez utiliser les arguments col et cex dans la fonction text() pour modifier respectivement la couleur et la taille de l’étiquette :

#create data frame
df <- data.frame(x=c(1, 1, 2, 3, 4, 4, 7, 7, 8, 9),
                 y=c(13, 14, 17, 12, 23, 24, 25, 28, 32, 33))

#create scatterplot of x vs. y
plot(df$x, df$y, pch=19)

#add horizontal line at y=20
abline(h=20)

#add label to horizontal line (with blue color and double the font size)
text(x=3, y=20.7, 'This is a label', col='blue', cex=2)

Notez que l’étiquette est désormais bleue et que la taille de la police est deux fois plus grande que dans l’exemple précédent.

Connexe : Comment utiliser cex pour modifier la taille des éléments de tracé dans R

Exemple 2 : Ajouter une étiquette à l’abline verticale dans R

Le code suivant montre comment créer un nuage de points avec une ligne horizontale à y=20 et une étiquette :

#create data frame
df <- data.frame(x=c(1, 1, 2, 3, 4, 4, 7, 7, 8, 9),
                 y=c(13, 14, 17, 12, 23, 24, 25, 28, 32, 33))

#create scatterplot of x vs. y
plot(df$x, df$y, pch=19)

#add vertical line at x=6
abline(v=6)

#add label to vertical line
text(x=5.8, y=20, srt=90, 'This is a label')

Notez qu’une étiquette a été ajoutée juste à gauche de l’abline verticale dans le tracé.

Remarque : L’argument srt=90 dans la fonction text() fait pivoter l’étiquette de 90 degrés.

Ressources additionnelles

Les didacticiels suivants expliquent comment effectuer d’autres tâches courantes dans R :

Comment créer un nuage de points avec une ligne de régression dans R
Comment ajouter une ligne horizontale à un tracé à l’aide de ggplot2
Comment ajouter une ligne verticale à un tracé à l’aide de ggplot2