플롯에서 제목의 일부분을 색칠하십시오.

Question

플롯에서 제목의 부분을 채색하는 것이 가능합니까?

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

이 플롯에서 slope=1의 색을 빨간색으로 변경하고 싶습니다.

Answer 1

은이 문제에 대한 매우 간단한 해결책이다 :

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