Как использовать курсивный шрифт в R (с примерами)

Редакция Кодкампа -

Вы можете использовать следующий базовый синтаксис для создания курсивного шрифта на графиках 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