Раскрасить части названия в сюжете

Можно ли раскрасить части названия в сюжете?

x = 1:10
y = 1:10
plot(x, y, main="title (slope=1)")

В этом графике я хотел бы изменить цвет slope=1 на красный.

Ответы

Ответ 1

Это довольно простое решение вашей проблемы:

plot(x, y)
title(expression("title (" * phantom("slope=1)") * ")"), col.main = "black")
title(expression(phantom("title (") * "slope=1"), col.main = "red")