Вы можете использовать функцию text() для добавления текста на график в базе R.
Эта функция использует следующий базовый синтаксис:
текст(х, у, «мой текст»)
куда:
- x, y : Координаты (x, y), где должен быть размещен текст.
В следующих примерах показано, как использовать эту функцию на практике.
Пример 1: добавление одного текстового элемента на график
В следующем коде показано, как использовать text() для добавления одного текстового элемента на график с координатами (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 ")
Обратите внимание, что наш текстовый элемент был добавлен к координатам (x, y) (5, 18) на графике.
Пример 2. Добавление нескольких текстовых элементов на график
Чтобы добавить на график несколько текстовых элементов, мы можем просто использовать несколько функций 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 ")
Обратите внимание, что на график были добавлены три текстовых элемента, каждый в координатах (x, y), которые мы указали.
Пример 3: Настройка текстовых элементов на графике
Мы можем использовать аргументы cex , col и font для настройки размера, цвета и стиля шрифта текстовых элементов на графике соответственно:
#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 )
Обратите внимание, что каждый из трех текстовых элементов имеет собственный внешний вид.
Также обратите внимание, что аргумент font принимает четыре возможных значения:
- 1 : равнина
- 2 : жирный
- 3 : курсив
- 4 : полужирный курсив
Поскольку мы указали font=3 для нашего третьего текстового элемента, шрифт будет курсивным.
Пример 4. Добавление текстовых меток к каждой точке графика
Мы можем использовать аргументы labels , чтобы добавить текстовую метку к каждой точке графика:
#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 )
Обратите внимание, что каждая точка на графике теперь имеет текстовую метку.
Также обратите внимание, что аргумент pos управляет положением текстовой метки относительно точки и принимает четыре возможных значения:
- 1 : под текстом
- 2 : слева от текста
- 3 : над текстом
- 4 : справа от текста
Поскольку мы указали pos=4 , каждая текстовая метка размещается справа от точек на графике.
Дополнительные ресурсы
В следующих руководствах объясняется, как использовать другие распространенные функции в R:
Как использовать функции paste & paste0 в R
Как использовать функцию replace() в R
Как использовать функцию View() в R