Re: format Text in graphics
- To: mathgroup at smc.vnet.net
- Subject: [mg42336] Re: format Text in graphics
- From: bghiggins at ucdavis.edu (Brian Higgins)
- Date: Tue, 1 Jul 2003 08:45:42 -0400 (EDT)
- References: <bdjfrb$8c7$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Another useful trick is to handle expressions that are candidates for
reorganization (i.e. z+a=>a+z when you use HoldForm is to make use of
the Infix function:
Plot[Sin[x], {x, 0, 2Pi}, Epilog -> Text[TraditionalForm[Infix[{z, a},
"+"]], {Pi, 1/2}]];
By manipulating Infix with HoldForm and replacement rules one can
obtain quite a bit of flexibility
Plot[Sin[x], {x, 0, 2Pi},
Epilog -> Text[TraditionalForm[HoldForm[f[x] = p] /. p -> Infix[{z,
a}, "+"]], {Pi, 1/2}]]
Cheers,
Brian