Comment ajouter des exposants & Indices aux tracés dans R

Vous pouvez utiliser la syntaxe de base suivante pour ajouter des exposants ou des indices aux tracés dans R :

#define expression with superscript
x_expression <- expression(x^3 ~ variable ~ label)

#define expression with subscript
y_expression <- expression(y[3] ~ variable ~ label)

#add expressions to axis labels
plot(x, y, xlab = x_expression, ylab = y_expression)

Les exemples suivants montrent comment utiliser cette syntaxe dans la pratique.

Exemple 1 : ajouter des exposants aux étiquettes des axes

Le code suivant montre comment ajouter des exposants aux étiquettes des axes d’un tracé dans R :

#define data
x <- c(1, 2, 3, 4, 5, 6, 7, 8)
y <- c(9, 12, 14, 16, 15, 19, 26, 29)

#define x and y-axis labels with superscripts
x_expression <- expression(x^3 ~ variable ~ label)
y_expression <- expression(y^3 ~ variable ~ label)

#create plot
plot(x, y, xlab = x_expression, ylab = y_expression)

Notez que les axes X et Y ont tous deux un exposant dans leur étiquette.

L’exposant de l’axe y est un peu coupé dans l’intrigue. Pour rapprocher les étiquettes des axes du tracé, nous pouvons utiliser la fonction par() dans R :

#adjust par values (default is (3, 0, 0))
par(mgp=c(2.5, 1, 0)) 

#create plot
plot(x, y, xlab = x_expression, ylab = y_expression)

Remarque : Nous avons choisi « 3 » comme valeur aléatoire à placer en exposant. N’hésitez pas à placer n’importe quelle valeur numérique ou caractère en exposant.

Exemple 2 : ajouter des indices aux étiquettes d’axe

Le code suivant montre comment ajouter des indices aux étiquettes des axes d’un tracé dans R :

#define data
x <- c(1, 2, 3, 4, 5, 6, 7, 8)
y <- c(9, 12, 14, 16, 15, 19, 26, 29)

#define x and y-axis labels with superscripts
x_expression <- expression(x[3] ~ variable ~ label)
y_expression <- expression(y[3] ~ variable ~ label)

#create plot
plot(x, y, xlab = x_expression, ylab = y_expression)

Exemple 3 : Ajouter des exposants et des indices à l’intérieur du tracé

Le code suivant montre comment ajouter un exposant à un élément de texte à l’intérieur d’un tracé :

#define data
x <- c(1, 2, 3, 4, 5, 6, 7, 8)
y <- c(9, 12, 14, 16, 15, 19, 26, 29)

#create plot
plot(x, y)

#define label with superscript to add to plot
R2_expression <- expression(paste(" ", R^2 , "= ", .905))

#add text to plot
text(x = 2, y = 25, label = R2_expression)

Ressources additionnelles

Comment créer un nuage de points dans R avec plusieurs variables
Comment créer des boîtes à moustaches côte à côte dans R
Comment superposer des tracés dans R