Cara menggambar legenda di luar plot di r

Cara termudah untuk menggambar legenda di luar plot dasar R adalah dengan menambahkan spasi ekstra di sebelah kanan plot menggunakan sintaks berikut:

 by( mar =c(5, 4, 4, 8), xpd= TRUE )

Contoh langkah demi langkah berikut menunjukkan cara menggunakan sintaksis ini dalam praktiknya.

Langkah 1: Buat datanya

Pertama, mari buat beberapa data untuk digunakan:

 #create data frames
df1 <- data. frame (x=c(1, 2, 3, 4, 5, 6, 7),
                  y=c(2, 7, 19, 26, 24, 29, 31))

df2 <- data. frame (x=c(1, 2, 3, 4, 5, 6, 7),
                  y=c(4, 4, 7, 9, 12, 13, 8))

Langkah 2: Buat plot dengan legenda di luar plot

Selanjutnya, mari buat jalur dan tambahkan legenda di luar jalur di pojok kanan atas:

 #add extra space to the right of the plot
by( mar =c(5, 4, 4, 8), xpd= TRUE )

#plot both data frames
plot(y ~ x, df1, pch =1, main=" Scatterplot with multiple groups ")
points(y ~ x, df2, pch =3)

#add legend outside of plot
legend(" topright ", inset =c(-0.2, 0), legend =c(" df1 "," df2 "), pch =c(1,3), title =" Data ") 

Langkah 3: Ubah Lokasi Legenda

Argumen inset(x, y) dapat digunakan untuk mengontrol lokasi legenda di sebelah kanan plot. Misalnya, kita dapat membuat argumen x lebih negatif untuk mendorong legenda lebih jauh ke kanan:

 #add extra space to the right of the plot
by( mar =c(5, 4, 4, 8), xpd= TRUE )

#plot both data frames
plot(y ~ x, df1, pch =1, main=" Scatterplot with multiple groups ")
points(y ~ x, df2, pch =3)

#add legend outside of plot
legend(" topright ", inset =c(-0.3, 0), legend =c(" df1 "," df2 "), pch =c(1,3), title =" Data ") 

Kita juga dapat membuat argumen y lebih positif untuk menurunkan legendanya:

 #add extra space to the right of the plot
by( mar =c(5, 4, 4, 8), xpd= TRUE )

#plot both data frames
plot(y ~ x, df1, pch =1, main=" Scatterplot with multiple groups ")
points(y ~ x, df2, pch =3)

#add legend outside of plot
legend(" topright ", inset =c(-0.3, .5), legend =c(" df1 "," df2 "), pch =c(1,3), title =" Data ") 

Jangan ragu untuk mengubah nilai argumen inset(x, y) untuk mengubah lokasi legenda.

Anda dapat menemukan lebih banyak tutorial R di halaman ini .