RE: Re: Re: word processing with mathematica
- To: mathgroup at smc.vnet.net
- Subject: [mg36500] RE: [mg36474] Re: [mg36437] Re: word processing with mathematica
- From: "DrBob" <drbob at bigfoot.com>
- Date: Mon, 9 Sep 2002 00:29:52 -0400 (EDT)
- Reply-to: <drbob at bigfoot.com>
- Sender: owner-wri-mathgroup at wolfram.com
P.J., I'd be very interested in how you created these "fancy" cells. Do you open a cell, push Ctrl-Shift-e, type in all that text, then push Ctrl-Shift-e again? Bobby Treat -----Original Message----- From: P.J. Hinton [mailto:paulh at wolfram.com] To: mathgroup at smc.vnet.net Subject: [mg36500] [mg36474] Re: [mg36437] Re: word processing with mathematica On Sat, 7 Sep 2002, Mark Westwood wrote: > I too have been trying to use Mathematica (v4.2 most recently) to type > maths papers and the like but I'm not ready to ditch LaTeX yet. There > are just too many cases where I cannot figure out how to achieve what I > want in Mathematica, things like: > - left brackets spanning multiple lines for defining hybrid functions; You can accomplish this by doing the following: 1) Put your function braches in the rows of a grid box structure. 2) Add the following options to your cell: ShowAutoStyles -> False SpanMaxSize -> Infinity The following cell snippet demonstrates how this influences the result. To view it, paste the Cell[] expression into a notebook and then click on Yes when you are prompted on whether the front end should interpret the result. Cell[BoxData[ FormBox[ RowBox[{ RowBox[{"f", "(", "x", ")"}], "=", RowBox[{"{", GridBox[{ {"x", RowBox[{"x", " ", "<", "0"}]}, { SuperscriptBox["x", "2"], RowBox[{"0", "\[LessEqual]", "x", "<", "1"}]}, { RowBox[{"sin", "(", "x", ")"}], RowBox[{"1", "\[LessEqual]", "x", "<", "2"}]}, { RowBox[{"\[CapitalGamma]", "(", "x", ")"}], RowBox[{"x", "\[GreaterEqual]", "2"}]} }]}]}], TraditionalForm]], "DisplayFormula", ShowAutoStyles->False, SpanMaxSize->Infinity] > - vertical alignment of equals signs in multi-line equations or > derivations; Put your equations in a GridBox and set the ColumnAlignments option to a string containing the equal sign. Cell[BoxData[ FormBox[GridBox[{ { RowBox[{ RowBox[{ RowBox[{"3", "x"}], " ", "+", " ", RowBox[{"4", " ", "y"}]}], " ", "=", " ", "9"}]}, { RowBox[{ RowBox[{ RowBox[{"2", "x"}], " ", "-", " ", RowBox[{"7", " ", "y"}]}], "=", RowBox[{"32", " ", "-", " ", RowBox[{"sin", "(", "x", ")"}]}]}]} }], TraditionalForm]], "DisplayFormula", GridBoxOptions->{ColumnAlignments->{"="}}] > - setting typefaces in tables of material. I think the Author Tools material that comes with Mathematica 4.2 might be able to help you do this. -- P.J. Hinton User Interface Programmer paulh at wolfram.com Wolfram Research, Inc. Disclaimer: Opinions expressed herein are those of the author alone.