Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2005
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2005

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

Search the Archive

Re: Three piece function

  • To: mathgroup at smc.vnet.net
  • Subject: [mg60220] Re: [mg60197] Three piece function
  • From: Tom De Vries <tom_toad at telus.net>
  • Date: Thu, 8 Sep 2005 04:52:58 -0400 (EDT)
  • Sender: owner-wri-mathgroup at wolfram.com

On 9/7/05 2:03 AM, "Steven Jonak" <JonakSt at gw.kirkwood.k12.mo.us> wrote:

> I'm a little new to using Mathematica for creating handouts/quizzes and
> tests so please bear with me!  I'm using Mathematica to write a test and
> I can't seem to get a decent looking three-piece function.  For two
> pieces, the typesetting palette works fine.  I used Show Expression to
> see how they got the curly bracket on the left side but when I tried to
> change it to three pieces with a curly bracket on the left side (a one
> row, three column matrix with the bracket) the size of the bracket
> doesn't change--and looks bad.
> Any suggestions?
> 
> S Jonak
> "Maintain an even strain."
> 
 Hello!   The cell option SpanMaxSize --> Infinity will help you.

Here is a working example I use for the purpose you are describing.  Hope it
helps.


Sincerely,  Tom De Vries


Cell[TextData[{
  Cell[BoxData[
      FormBox[
       RowBox[{
         RowBox[{"f", "(", "x", ")"}], " ", "=", " ",
          TagBox[
           StyleBox[
             RowBox[{"{", GridBox[{
                   {"1"},
                   {
                     RowBox[{"-", "x"}]},
                   {"1"}
                   }]}],
             ShowAutoStyles->False],
           (#&)]}], TraditionalForm]]],
  "        ",
  Cell[BoxData[
     FormBox[GridBox[{
           {
             RowBox[{
               RowBox[{"if", "                ", "x"}],
               "\[LessEqual]",
               RowBox[{"-", "1"}]}]},
           {
             RowBox[{
               RowBox[{"if", " ", "-", "1"}], " ", "<", " ", "x",
               " ", "\[LessEqual]", " ", "1"}]},
           {
             RowBox[{
               RowBox[{"if", "                ", "x"}], " ", ">",
               " ", "1"}]}
           },
         ColumnAlignments->{Left}], TraditionalForm]]]
}], "Text",
  SpanMaxSize->Infinity]
 


  • Prev by Date: Re: true limit of mathematica ? Help me !!!
  • Next by Date: Re: Three piece function
  • Previous by thread: Re: Three piece function
  • Next by thread: Mathematica won't run if LANG var is set to pt_BR