Re: Tick Labels Example

• To: mathgroup at smc.vnet.net
• Subject: [mg47198] Re: Tick Labels Example
• From: bobhanlon at aol.com (Bob Hanlon)
• Date: Tue, 30 Mar 2004 04:01:50 -0500 (EST)
• References: <c48qkp\$lo7\$1@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

```The searchable archive is at http://forums.wolfram.com/mathgroup/

p1 = Plot[x^2-2x+1, {x,-2,3},
DisplayFunction->Identity];

Show[p1, DisplayFunction->\$DisplayFunction,
PlotLabel -> "Original Plot"];

Changing FontSize and FontWeight:

Show[p1, DisplayFunction->\$DisplayFunction,
TextStyle-> {FontSize->12, FontWeight->"Bold"},
PlotLabel -> "Changed Font Size and Weight"];

Also changing the length and thickness of the Ticks and using different style
for label

oldTicks= Ticks /. AbsoluteOptions[p1];

newTicks = oldTicks /. {
{x_, 0.} -> {3/2x, 0},
AbsoluteThickness[x_]->AbsoluteThickness[3/2x],
x_?(Abs[Round[#]-#]<10^-10&) -> Round[x]};

Show[p1, Ticks -> newTicks,
DisplayFunction->\$DisplayFunction,
TextStyle-> {FontSize->12, FontWeight->"Bold"},
PlotLabel -> StyleForm["New Ticks and Label Style",
FontFamily->"Arial",FontSize->14,
FontSlant->"Italic", FontWeight->"Plain"]];

Bob Hanlon

In article <c48qkp\$lo7\$1 at smc.vnet.net>, Terry <tharter at attglobal.net> wrote:

<< I'm sure its been posted here before in the past (is there a
newsgroup archive that is searchable?), but could some one post an
example of how to get the Tick Labels in  a 2D Plot  displayed  in
something other  than the  "Default" settings.  for example, change the
font size, and  the "Boldness" attribute.  Any simple example will do.
I don't need to produce any new  tick marks than what the  default
gives,   I just want them to appear more visible. >><BR><BR>

```

• Prev by Date: RE: Tick Labels Example
• Next by Date: RE: Dashed space curve
• Previous by thread: RE: Tick Labels Example
• Next by thread: RE: Tick Labels Example