Include text control characters in plotmath expressions
expression, graphics, plot, plotmath, r
Solution
As you have figured `plotmath` does not support newlines within, but you can use `mtext` with `bquote`, to write each line. For example I create a list of lines :
Lines <- list(bquote(paste( "Plot of " , phi , " of: " , .(lab))),
bquote(paste("Functional form: " , .(form)))
mtext(do.call(expression, Lines),side=3,line=1:0)
Problem
Is there any way to get control characters for text strings, e.g. `"\n"` for `newline` evaluated inside a plotmath expression, or vice versa. In the following example, I would like to combine: - some character text - text control character (newline) - substitute a variable name - include a plotmath expression After reading this question I can get most of the way there with substitute, but the `newline` character is not evaluated. I am now going round in circles and confusing myself with `plotmath`, `parse`, `bquote` and `substitute`. In the help page for plotmath it says Control characters (e.g. \n) are not interpreted in character strings in plotmath, unlike normal plotting. Does this mean it really is impossible? ``` 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 ) ```