Is it possible to build text with a mirror image in R?

Question

I know there is a str argument in a text function; It would be nice if I could build mirror letters / strings ... Any idea?

Answer 1

You can play with grImport, but it's pretty confusing

library(grImport) cat("%!PS /Times-Roman findfont 100 scalefont setfont newpath 0 0 moveto -1 1 scale (hello) show", file="hello.ps") PostScriptTrace("hello.ps", "hello.xml") hello <- readPicture("hello.xml") grid.newpage() grid.picture(hello) 

Answer 2

Here's a solution based on the all-powerful tikzDevice package in which LaTeX processes strings

 library(tikzDevice) tikz("mirror.tex", standAlone = TRUE, height=2,width=4) plot(1,1, xlab="\\reflectbox{Otto and Hannah mostly won't care}") dev.off()