Cara mengubah posisi legenda di plot r dasar

Ada dua cara untuk mengubah posisi legenda di plot R dasar:

Metode 1: Gunakan koordinat (x,y)

 legend( 4 , 12 , legend=c(' y1 ', ' y2 '), col=c(' purple ', ' red '), lty= 1 )

Metode 2: Gunakan Kata Kunci

 legend(' bottomright ', legend=c(' y1 ', ' y2 '), col=c(' purple ', ' red '), lty= 1 )

Dengan menggunakan metode ini, Anda dapat menentukan lokasi berikut:

• “di kanan bawah”
• “turun”
• “di kiri bawah”
• “KIRI”
• “di pojok kiri atas”
• “tinggi”
• “kanan atas”
• “BENAR”
• “tengah”

Contoh berikut menunjukkan cara menggunakan masing-masing metode dalam praktik.

Contoh 1: Ubah posisi legenda menggunakan koordinat (x,y).

Kode berikut menunjukkan cara membuat legenda untuk plot dasar R dan menempatkannya di x=4 dan y=12:

 #createdata
x <- 1:10
y1<- c(3, 6, 8, 7, 8, 9, 13, 12, 10, 10)
y2 <- c(1, 3, 3, 4, 6, 7, 8, 10, 9, 9)

#create plot with multiple lines
plot(x, y1, col=' purple ', type=' l ', xlab=' x ', ylab=' y ')
lines(x, y2, col=' red ')

#add legend
legend( 4 , 12 , legend=c(' y1 ', ' y2 '), col=c(' purple ', ' red '), lty= 1 ) 

Perhatikan bahwa legenda ditempatkan tepat pada koordinat (x,y) yang kita tentukan.

Contoh 2: Ubah posisi caption menggunakan kata kunci

Kode berikut menunjukkan cara membuat legenda untuk plot dasar R dan menempatkannya di sudut kiri atas:

 #create data
x <- 1:10
y1<- c(3, 6, 8, 7, 8, 9, 13, 12, 10, 10)
y2 <- c(1, 3, 3, 4, 6, 7, 8, 10, 9, 9)

#create plot with multiple lines
plot(x, y1, col=' purple ', type=' l ', xlab=' x ', ylab=' y ')
lines(x, y2, col=' red ')

#add legend
legend(' topleft ', legend=c(' y1 ', ' y2 '), col=c(' purple ', ' red '), lty= 1 ) 

Legenda ditempatkan di sudut kiri atas plot, seperti yang kami tentukan.

Kita dapat dengan mudah memindahkannya ke lokasi lain, seperti pojok kanan bawah, menggunakan kata kunci yang berbeda:

 #create data
x <- 1:10
y1<- c(3, 6, 8, 7, 8, 9, 13, 12, 10, 10)
y2 <- c(1, 3, 3, 4, 6, 7, 8, 10, 9, 9)

#create plot with multiple lines
plot(x, y1, col=' purple ', type=' l ', xlab=' x ', ylab=' y ')
lines(x, y2, col=' red ')

#add legend
legend(' bottomright ', legend=c(' y1 ', ' y2 '), col=c(' purple ', ' red '), lty= 1 ) 

Legenda tersebut sekarang ditempatkan di sudut kanan bawah plot.

Terkait: Cara menggambar legenda di luar plot di R

Sumber daya tambahan

Tutorial berikut menjelaskan cara melakukan tugas umum lainnya di R:

Cara memplot banyak garis dalam grafik di R
Cara menggambar garis yang paling sesuai di R
Cara menggunakan aline() di R