Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2008

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

Search the Archive

Re: Math Formulas

  • To: mathgroup at smc.vnet.net
  • Subject: [mg92660] Re: Math Formulas
  • From: "David Park" <djmpark at comcast.net>
  • Date: Fri, 10 Oct 2008 04:31:45 -0400 (EDT)
  • References: <gckn71$noe$1@smc.vnet.net>

What about:

Sum[Binomial[c, i] p^i (1 - p)^(c - i), {i, 0, c}] //
  HoldForm // TraditionalForm

??

Are you simply using Mathematica as a scientific word processor? A kind of 
MaTeX? Interesting, but it seems you will lose all the active calculational 
and dynamic capabilities of Mathematica. That's what you're paying for. I 
think it is possible to write active notebooks that look like classical 
papers - but WRI doesn't always make it easy.

-- 
David Park
djmpark at comcast.net
http://home.comcast.net/~djmpark/


"John" <jwa0 at lehigh.edu> wrote in message news:gckn71$noe$1 at smc.vnet.net...
> Mathematica 6, WindowsXP
>
> NotebookPut[
> Notebook[{Cell["October 7, 2008", "Text", TextAlignment -> 1,
>    FontSize -> 24, Bold,
>    CellMargins -> {{Inherited, Inherited}, {50, Inherited}}],
>   Cell["Probability Of Acceptance", "Section", "Text",
>    CellFrame -> False,
>    CellMargins -> {{Inherited, Inherited}, {4, 3}}],
>   Cell["Use the formula,", "Text", TextJustification -> 1,
>    Hyphenation -> True, FontSize -> 16, Bold, CellFrame -> False,
>    CellMargins -> {{Inherited, Inherited}, {10, Inherited}}],
>   Cell[BoxData[
>     RowBox[{ RowBox[{"(", GridBox[{{"c"}, {"i"}}], ")"}],
>       SuperscriptBox["p", "i"],
>       SuperscriptBox["(1-p)", "c-i"]}] ] ,        "Text",
>    FontSize -> 16, Bold, TextJustification -> 1, Hyphenation -> True,
>     CellMargins -> {{Inherited + 35, Inherited}, {10, Inherited}}],
>   Cell["to compute the probability that acceptance sampling deems a \
> lot to be acceptable. Values of n, c amd p are specified by the \
> user.", "Text", FontSize -> 16, Bold, TextJustification -> 1,
>    Hyphenation -> True, CellFrame -> False,
>    CellMargins -> {{Inherited, Inherited}, {10, Inherited}}]}]]
>
> The cell that prints the  formula was suggested to me by Bob. It
> prints the formula correctly.
> My attempts to insert a summation sign in front of the formula failed.
> The command
>
>    Sum[f,{i,0,c}]
>
> didn't do the job. Maybe I didn't put it in the right place.
>
> Latex formulas are elegant (suitable for framing). Can Mathematica
> match the elegance of Latex? If so I want to know how to do it.
>
> John
>
>
> 



  • Prev by Date: I can plot a function but when I try FindRoot it complains
  • Next by Date: time based moving average (and other newbie mathematica questions)
  • Previous by thread: Re: Math Formulas
  • Next by thread: Re: Math Formulas