Як намалювати легенду за межами сюжету в r

Найпростіший спосіб намалювати легенду за межами діаграми базового R – це додати додатковий простір праворуч від діаграми за допомогою такого синтаксису:

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

Наступний покроковий приклад показує, як використовувати цей синтаксис на практиці.

Крок 1: Створіть дані

Спочатку давайте створимо дані для роботи:

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

Крок 2: Створіть сюжет із легендою за межами сюжету

Далі створимо шлях і додамо легенду поза контуром у верхньому правому куті:

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

Крок 3: Змініть розташування легенди

Аргумент inset(x, y) можна використовувати для керування розташуванням легенди праворуч від графіка. Наприклад, ми можемо зробити аргумент x більш негативним, щоб посунути легенду ще далі вправо:

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

Ми також можемо зробити аргумент y більш позитивним, щоб опустити легенду нижче:

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

Не соромтеся змінювати значення аргументу inset(x, y) , щоб змінити розташування легенди.

Ви можете знайти більше посібників з R на цій сторінці .