RE: format Text in graphics
- To: mathgroup at smc.vnet.net
- Subject: [mg42272] RE: [mg42251] format Text in graphics
- From: "David Park" <djmp at earthlink.net>
- Date: Thu, 26 Jun 2003 05:36:26 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Murray,
Doesn't SequenceForm work here?
f[x_] := x^2
Plot[f[x], {x, -1, 1},
Epilog -> {Text[
SequenceForm[TraditionalForm[y], " = ",
TraditionalForm[f[x]]], {0.5, 0.5}]}];
David Park
djmp at earthlink.net
http://home.earthlink.net/~djmp/
From: Murray Eisenberg [mailto:murray at math.umass.edu]
To: mathgroup at smc.vnet.net
What value of Epilog in a Plot expression will properly format
y = f(x)
in conventional mathematical style? That is, the y, f, and x should be
italicized but the = and parentheses should not.
Some things that do NOT work:
Epilog -> Text[TraditionalForm[y = f(x)], {0.5, 0.5}]
(* that just sets y to be f(x) and then displays f(x) *)
textForm[txt_] := StyleForm[txt, FontFamily -> Times]
mathForm[txt_] := StyleForm[txt, FontFamily -> Times, FontSlant -> Italic]
Epilog -> Text[mathForm["y "], textForm["="], mathForm[" f(x)"], {0.5 0.5}]
(* SOMETHING like the preceding should work, but I don't see how to
combine the three StyleForm results *)
--
Reply to "REPLY TO" address and NOT to the "FROM" address!!
Otherwise I will never see your reply!!!!!!!!!!!!!!!!!!!!!!
Murray Eisenberg murray at math.umass.edu
Mathematics & Statistics Dept.
Lederle Graduate Research Tower phone 413 549-1020 (H)
University of Massachusetts 413 545-2859 (W)
710 North Pleasant Street fax 413 545-1801
Amherst, MA 01003-9305