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 > > >