Re: Re: TraditionalForm ordering
- To: mathgroup at smc.vnet.net
- Subject: [mg81066] Re: [mg80279] Re: [mg80217] TraditionalForm ordering
- From: Mitch Murphy <mitch at lemma.ca>
- Date: Mon, 10 Sep 2007 18:53:15 -0400 (EDT)
- References: <200708150812.EAA09733@smc.vnet.net> <200708160851.EAA23692@smc.vnet.net>
Carl, wow! i've been banging my head against turning off automated canonical ordering for hours. basically i want to keep order of equation "as entered" ... In[44]:= c - b + a Out[44]= a - b + c In[45]:= PolynomialForm[HoldForm[c - b + a], TraditionalOrder -> False] Out[45]= c - b + a ... but how do i get rid of a leading one coeff (which is now inside HoldForm) In[46]:= c - 1 b + a Out[46]= a - b + c In[47]:= PolynomialForm[HoldForm[c - 1 b + a], TraditionalOrder -> False] Out[47]= c - 1 b + a thanks, Mitch On Aug 16, 2007, at 04:51, Carl Woll wrote: > Use the undocumented function PolynomialForm: > > TraditionalForm @ PolynomialForm[HoldForm[b + a], TraditionalOrder - > > False] > > Carl Woll > Wolfram Research > >> Bonus points: >> Explain the output of this command in terms of the pattern >> matching of >> FormatValues, Attributes, and DefaultValues of Times. >> >> Grid[Outer[HoldForm@Times[1,##,1]&,{2,a,1},{2,a,1}],Dividers->All] >> >> >> >