Jak dodać indeksy górne i dolne do wykresów w r

Możesz użyć następującej podstawowej składni, aby dodać indeksy górne i dolne do wykresów w 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)

Poniższe przykłady pokazują, jak używać tej składni w praktyce.

Przykład 1: Dodaj wykładniki do etykiet osi

Poniższy kod pokazuje, jak dodać wykładniki do etykiet osi wykresu w 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)

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

Należy zauważyć, że osie X i Y mają wykładnik na swojej etykiecie.

Wykładnik osi Y jest nieco obcięty na wykresie. Aby przybliżyć etykiety do osi wykresu, możemy użyć funkcji par() w R:

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

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

Uwaga : Wybraliśmy „3” jako losową wartość do umieszczenia jako wykładnik. Możesz umieścić dowolną wartość liczbową lub znak jako indeks górny.

Przykład 2: Dodaj indeksy dolne do etykiet osi

Poniższy kod pokazuje, jak dodać indeksy do etykiet osi wykresu w 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)

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

Przykład 3: Dodawanie indeksów górnych i dolnych wewnątrz wykresu

Poniższy kod pokazuje, jak dodać indeks górny do elementu tekstowego wewnątrz ścieżki:

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

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

Dodatkowe zasoby

Jak utworzyć wykres rozrzutu w R z wieloma zmiennymi
Jak tworzyć wykresy pudełkowe obok siebie w R
Jak nakładać działki w R