Re: Output format of partial derivatives
- To: mathgroup at smc.vnet.net
- Subject: [mg16866] Re: Output format of partial derivatives
- From: paulh (P.J. Hinton)
- Date: Mon, 5 Apr 1999 02:24:14 -0400
- Organization: Wolfram Research, Inc.
- References: <7e1amq$b7u@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
In article <7e1amq$b7u at smc.vnet.net>, Christian Zemlin <chr at binf.bio.uu.nl> writes:
> I am working with expressions that contain MANY partial derivatives, and
> they would be much easier to read if instead of Mathematica's notation,
>
> (1,1)
> f (x,y)
>
> I could get something like
>
> f
> xy
>
> Does anybody know how to get such output?
Change the low-level formatting rules for a derivative expressed in
TraditionalForm.
MakeBoxes[Derivative[indices__][f_][vars__], TraditionalForm] :=
SubscriptBox[MakeBoxes[f, TraditionalForm],
RowBox[Map[ToString,
Flatten[Thread[dummyhead[{vars}, Partition[{indices}, 1]]] /.
dummyhead -> Table]]]]?
Here is how you exploit this formatting code.
TraditionalForm[Derivative[1, 1][f][x, y]]
This should yield output as you describe.
--
P.J. Hinton
Mathematica Programming Group paulh at wolfram.com
Wolfram Research, Inc. http://www.wolfram.com/~paulh/
Disclaimer: Opinions expressed herein are those of the author alone.