Cara menambahkan superskrip & subskrip ke plot di r

Anda dapat menggunakan sintaks dasar berikut untuk menambahkan superskrip atau subskrip ke plot di 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)

Contoh berikut menunjukkan cara menggunakan sintaksis ini dalam praktiknya.

Contoh 1: Tambahkan Eksponen ke Label Sumbu

Kode berikut menunjukkan cara menambahkan eksponen ke label sumbu plot di 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)

Perhatikan bahwa sumbu X dan Y keduanya memiliki eksponen pada labelnya.

Eksponen sumbu y terpotong sedikit di plot. Untuk mendekatkan label ke sumbu plot, kita dapat menggunakan fungsi par() di 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) 

Catatan : Kami memilih “3” sebagai nilai acak untuk ditempatkan sebagai eksponen. Jangan ragu untuk menempatkan nilai numerik atau karakter apa pun sebagai superskrip.

Contoh 2: Tambahkan Subskrip ke Label Sumbu

Kode berikut menunjukkan cara menambahkan indeks ke label sumbu plot di 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) 

Contoh 3: Menambahkan Superskrip dan Subskrip di Dalam Plot

Kode berikut menunjukkan cara menambahkan superskrip ke elemen teks di dalam jalur:

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

Sumber daya tambahan

Cara membuat scatterplot di R dengan banyak variabel
Cara Membuat Plot Kotak Berdampingan di R
Cara melapisi plot di R