Re: Re: format Text in graphics
- To: mathgroup at smc.vnet.net
- Subject: [mg42284] Re: [mg42267] Re: format Text in graphics
- From: Richard Gass <gass at physics.uc.edu>
- Date: Fri, 27 Jun 2003 06:31:15 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Murrary,
What about
\!\(\*
RowBox[{
RowBox[{"Plot", "[",
RowBox[{\(Sin[$B&H(B]\^2\/\(2 + Cos[$B&H(B]\^2\)\), ",", \({$B&H(B, 0, $B&P(B}\), ",",
RowBox[{"PlotLabel", "->",
RowBox[{"StyleForm", "[",
RowBox[{
RowBox[{"TraditionalForm", "[",
RowBox[{"StringJoin", "[",
RowBox[{
"\"\<\!\(\*
StyleBox[\"y\",\nFontSlant->\"Italic\"]\)($B&H(B)\>\"", ",", "\"\<=\>\"",
",",
"\"\<\!\(Sin[$B&H(B]\^2\/\(2 + Cos[$B&H(B]\^2\)\)\>\""}], "]
"}], "]"}], ",", \(FontSize -> 12\)}], "]"}]}]}], "]"}],
";"}]\)
This is hard to read but will look ok when pasted in to Mathematica. I
have not italicized the $B&H(B out of laziness but I could do that the same
way as the y.
On Thursday, June 26, 2003, at 05:36 AM, Murray Eisenberg wrote:
Thanks -- but NO! Your suggestion does NOT accomplish what I asked. I
already tried it. Here's what's wrong with that approach:
(1) It prints a doubled equal sign, not a single equal sign. As I said,
I truly want a conventional mathematical formula, y = f(x), with the y
and the x italicized (and nothing else italicized).
(2) If one tries to replace the == with a single =, then of course one
winds up with precisely the original difficulty I mentioned: it assigns
the expression f[x] to y and prints only the f(x), albeit the latter in
correct conventional mathematical form with f and x italicized but the
parenthses not italicized.
Further, using a single = has the undesirable side efffect of assigning
a value to y. (That one could work around by using a Block, etc. But
still the real difficulty is that the "y = " doesn't appear in the
printed text.)
Richard Gass
Department of Physics
University of Cincinnati