Вы можете использовать следующий базовый синтаксис для создания курсивного шрифта на графиках R:
substitute(paste(italic('this text is italic')))
В следующих примерах показано, как использовать этот синтаксис на практике.
Пример 1: Курсив в названии сюжета
В следующем коде показано, как использовать курсивный шрифт в заголовке графика в R:
#define data
x <- c(1, 2, 3, 4, 4, 5, 6, 6, 7, 9)
y <- c(8, 8, 9, 10, 13, 12, 10, 11, 14, 17)
#create scatterplot with title in italics
plot(x, y, main = substitute(paste(italic('Scatterplot of x vs. y'))))
Обратите внимание, что мы также можем указать курсив только для некоторых слов в заголовке:
#create scatterplot with only some of title in italics
plot(x, y, main = substitute(paste(italic('Scatterplot of'), 'x vs. y')))
Пример 2: Курсив на метках осей графика
В следующем коде показано, как указать курсивный шрифт для меток оси x и оси y графика:
#define data
x <- c(1, 2, 3, 4, 4, 5, 6, 6, 7, 9)
y <- c(8, 8, 9, 10, 13, 12, 10, 11, 14, 17)
#create scatterplot with axes labels in italics
plot(x, y, xlab = substitute(paste(italic('X Label'))),
ylab = substitute(paste(italic('Y Label'))))
Пример 3: курсивный шрифт с текстом на графике
В следующем коде показано, как включить курсивный шрифт для текстового элемента внутри графика:
#define data
x <- c(1, 2, 3, 4, 4, 5, 6, 6, 7, 9)
y <- c(8, 8, 9, 10, 13, 12, 10, 11, 14, 17)
#create scatterplot
plot(x, y)
#add italic text at location x=3, y=16
text(3, 16, substitute(paste(italic('This is some italic text'))))
Дополнительные ресурсы
В следующих руководствах объясняется, как выполнять другие распространенные функции в R:
Как добавить верхние и нижние индексы к графикам в R
Как изменить размер шрифта в ggplot2