Services & Resources / Wolfram Forums / MathGroup Archive

MathGroup Archive 2009

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: numbered figures

  • To: mathgroup at
  • Subject: [mg99749] Re: numbered figures
  • From: Hannes <HannesKessler at>
  • Date: Wed, 13 May 2009 05:07:11 -0400 (EDT)
  • References: <gu8uhq$6tn$>

Thanks Tom, your style is just what I was looking for.

I copied the default style sheet Default.nb to Default.modified.nb
into my $UserBaseDirectory/SystemFiles/FrontEnd/StyleSheets directory
and added your style with a text editor. Now it can be loaded into an
open notebook from the Format->Stylesheet menu. I inserted also the
option MenuPosition->10000 after CounterIncrements->"Figure". After
that, the new Figure style can be chosen from the style dropdown menu
in the edit toolbar if that  has been switched on in the option
inspector (ctrl-shift-o, Show option values->Global preferences,

Best regards,
Hannes Kessler

On 11 Mai, 12:27, Tom Burton <tbur... at> wrote:
> I put the following cells in my local style sheet. Then "Figure" is a  
> defined style. I do the same for Tables. Use an Automatic Numbering  
> object to reference Figure by number. The key elements in the text  
> below are CounterBox and CounterIncrements.  The rest is formating,  
> which you can change to suit your taste, although you should probably  
> retain PageBreakAbove->False.
> Cell[StyleData["Figure"],
> CellMargins->{{55, 50}, {5, 5}},
> PageBreakAbove->False,
> CellFrameLabels->{{
>     Cell[
>      TextData[{"Figure ",
>        CounterBox["Figure"], ". "}]], None}, {None, None}},
> Hyphenation->True,
> CounterIncrements->"Figure",
> FontFamily->"Ariel",
> FontSize->10,
> FontWeight->"Bold"]
> Cell[StyleData["Figure", "Presentation"],
> CellMargins->{{55, 50}, {5, 5}},
> PageBreakAbove->False,
> Hyphenation->True,
> FontFamily->"Ariel",
> FontSize->13,
> FontWeight->"Bold"]
> Cell[StyleData["Figure", "Printout"],
> CellMargins->{{55, 55}, {5, 2}},
> FontSize->8]
> It would probably be better to add this to an external style sheet and =
> then reference the sheet, but I've never learned to do that.
> BTW, this dates back to version 5. There may be better ways now to do  
> this.

  • Prev by Date: Re: second simple problem
  • Next by Date: Re: Optimize speed of plotting mesh
  • Previous by thread: Re: numbered figures
  • Next by thread: Spectral graph theory of the Buckyball