Cara menggunakan fungsi text() di r untuk menambahkan teks ke plot

Anda dapat menggunakan fungsi text() untuk menambahkan teks ke plot dasar R.

Fungsi ini menggunakan sintaks dasar berikut:

teks(x, y, “teks saya”)

Emas:

• x, y : Koordinat (x, y) dimana teks seharusnya ditempatkan.

Contoh berikut menunjukkan cara menggunakan fungsi ini dalam praktiknya.

Contoh 1: Tambahkan elemen teks ke jalur

Kode berikut menunjukkan cara menggunakan text() untuk menambahkan elemen teks ke plot pada koordinat (x, y) (5, 18):

 #create data frame with values to plot
df <- data. frame (x=c(1, 4, 7, 8, 8, 10),
                 y=c(4, 9, 16, 14, 12, 20))

#create scatterplot
plot(df$x, df$y)

#add text element at (5, 18)
text(x= 5 , y= 18 , “ this is my text ”)

Perhatikan bahwa elemen teks kita telah ditambahkan ke koordinat (x, y) (5, 18) pada plot.

Contoh 2: Tambahkan beberapa elemen teks ke jalur

Untuk menambahkan beberapa elemen teks ke plot, kita cukup menggunakan beberapa fungsi text() :

 #create data frame with values to plot
df <- data. frame (x=c(1, 4, 7, 8, 8, 10),
                 y=c(4, 9, 16, 14, 12, 20))

#create scatterplot
plot(df$x, df$y)

#add text elements
text(x= 5 , y= 18 , “ first text ”)
text(x= 5 , y= 10 , “ second text ”) 
text(x= 5 , y= 5 , “ third text ”) 

Perhatikan bahwa tiga elemen teks telah ditambahkan ke plot, masing-masing pada koordinat (x, y) yang kita tentukan.

Contoh 3: Sesuaikan elemen teks dalam plot

Kita dapat menggunakan argumen cex , col , dan font untuk menyesuaikan ukuran, warna, dan gaya font elemen teks dalam plot, masing-masing:

 #create data frame with values to plot
df <- data. frame (x=c(1, 4, 7, 8, 8, 10),
                 y=c(4, 9, 16, 14, 12, 20))

#create scatterplot
plot(df$x, df$y)

#add text elements with custom appearance
text(x= 5 , y= 18 , " first text ", col=' red ')
text(x= 5 , y= 10 , " second text ", col=' blue ', cex= 3 ) 
text(x= 5 , y= 5 , " third text ", col=' green ', cex= 5 , font= 3 ) 

Perhatikan bahwa masing-masing dari tiga elemen teks memiliki tampilan khusus.

Perhatikan juga bahwa argumen font mengambil empat kemungkinan nilai:

• 1 : polos
• 2 : gemuk
• 3 : miring
• 4 : tebal-miring

Karena kami menentukan font=3 untuk elemen teks ketiga kami, fontnya dicetak miring.

Contoh 4: Tambahkan Label Teks ke Setiap Titik Jalur

Kita dapat menggunakan argumen labels untuk menambahkan label teks ke setiap titik pada plot:

 #create data frame with values to plot
df <- data. frame (teams=c('A', 'B', 'C', 'D', 'E', 'F'),
                 x=c(1, 4, 7, 8, 8, 10),
                 y=c(4, 9, 16, 14, 12, 20))

#create scatterplot
plot(df$x, df$y)

#add text label to each point in plot
text(df$x, df$y, labels=df$teams, pos= 4 )

Perhatikan bahwa setiap titik pada plot sekarang memiliki label teks.

Perhatikan juga bahwa argumen pos mengontrol penempatan label teks relatif terhadap titik dan mengambil empat kemungkinan nilai:

• 1 : di bawah teks
• 2 : di sebelah kiri teks
• 3 : di atas teks
• 4 : teks hukum

Karena kita menentukan pos=4, setiap label teks ditempatkan di sebelah kanan titik plot.

Sumber daya tambahan

Tutorial berikut menjelaskan cara menggunakan fungsi umum lainnya di R:

Cara menggunakan fungsi paste dan paste0 di R
Cara menggunakan fungsi replace() di R
Cara menggunakan fungsi View() di R