Includere caratteri di controllo testo nelle espressioni plotmath

Question

C'è un modo per ottenere caratteri di controllo per le stringhe di testo, ad es. "\n" per newline valutato all'interno di un'espressione plotmath o viceversa. Nel seguente esempio, desidero combinare:

• certo testo carattere
• testo carattere di controllo (nuova riga)
• sostituto un nome variabile
• includono un'espressione plotmath

Dopo lettura this question Posso ottenere la maggior parte del modo lì con sostituto, ma il carattere newline non viene valutato. Ora sto girando a vuoto e mi confondo con plotmath, parse, bquote e substitute. Nel help page per plotmath si dice

caratteri di controllo (ad esempio \ n) non sono interpretati in stringhe di caratteri in plotmath, a differenza di tracciato normale.

Ciò significa che è davvero impossibile?

lab = "some data" 
form = "Exponential" 
x = 1:10 
y = x^2 


plot(x , y , type = "b") 
title(main = substitute(paste("Plot of " , phi , " of: " , lab , "\nFunctional form: " , form) , list(lab = lab , form = form)) , adj = 0) 

Answer 1

Come avrete capito plotmath non supporta a capo all'interno, ma è possibile utilizzare mtext con bquote, di scrivere ogni riga. Per esempio a creare un elenco di linee:

Lines <- list(bquote(paste("Plot of " , phi , " of: " , .(lab))), 
       bquote(paste("Functional form: " , .(form))) 

mtext(do.call(expression, Lines),side=3,line=1:0) 

Answer 2

Per ragioni di completezza, ecco un'altra soluzione utilizzando Unicode e non espressioni (adattato da here e here):

plot(x, y, type="b") 
title(main=paste("Plot of \u03A6 of:", lab, "\nFunctional form:", form), adj=0) 

Answer 3

se si utilizza la grafica della griglia, quindi il following grob può essere utile allo spazio le linee in base alla loro altezza,

library(devtools) 
source_gist(2732693) 
grid.expr(as.expression(Lines)) 

(utilizzando linee di agstudy)