Як змінити положення легенди на базових діаграмах r

Є два способи змінити положення легенди на основних R-схемах:

Спосіб 1: Використовуйте координати (x,y)

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

Спосіб 2: Використовуйте ключові слова

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

Використовуючи цей метод, ви можете вказати такі місця:

• “внизу праворуч”
• “вниз”
• “внизу ліворуч”
• «ЛІВО»
• “у верхньому лівому куті”
• “високий”
• “верхній правий”
• «ПРАВО»
• “центр”

Наступні приклади показують, як використовувати кожен метод на практиці.

Приклад 1: змініть положення легенди за допомогою координат (x,y).

У наведеному нижче коді показано, як створити легенду для базового графіка R і розмістити її на x=4 і 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 ) 

Зверніть увагу, що легенда розміщена в точних координатах (x,y), які ми вказали.

Приклад 2: змініть позицію підпису за допомогою ключових слів

У наведеному нижче коді показано, як створити легенду для базової діаграми R і розмістити її у верхньому лівому куті:

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

Легенда розміщується у верхньому лівому куті сюжету, як ми і вказали.

Ми можемо легко перемістити його в інше місце, наприклад у нижній правий кут, використовуючи інше ключове слово:

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

Легенда тепер розміщена в нижньому правому куті сюжету.

Пов’язане: Як намалювати легенду за межами сюжету в R

Додаткові ресурси

У наступних посібниках пояснюється, як виконувати інші типові завдання в R:

Як побудувати кілька ліній на графіку в R
Як провести лінію найкращого підходу в R
Як використовувати aline() у R