Utilizzando diversi tipi di carattere in annotate (ggplot2)

Question

Sto usando il codice seguente per generare un grafico semplice, con alcune annotazioni:

require(ggplot2); data(mtcars) 
ggplot(mtcars, aes(x = wt, y = mpg)) + 
    geom_point() + 
    annotate("text", x = 4, y = 25, label = "This should be bold\nand this not", 
      colour = "red") + 
    geom_vline(xintercept = 3.2, colour = "red") 

In quella tabella vorrei applicare grassetto carattere alla prima parte della frase nella nota di testo:

Questo dovrebbe essere in grassetto

ma desidero che la restante parte del testo rimanga inalterata rispetto al carattere e allo stile del font.

Answer 1

Come sull'utilizzo plotmath sintassi con parse = TRUE:

ggplot(mtcars, aes(x = wt, y = mpg)) + 
    geom_point() + 
    annotate("text", x = 4, y = 25, 
      label = 'atop(bold("This should be bold"),"this should not")', 
      colour = "red", parse = TRUE) + 
    geom_vline(xintercept = 3.2, colour = "red") 

Answer 2

Se non hanno un problema con suddividerlo in due annotazioni, si può solo fare:

annotate("text", x = 4, y = 25, label = "This should be bold", 
     colour = "red", fontface =2)+ 
annotate("text", x = 4, y = 24, label = "and this not", 
     colour = "red")