I have a notebook in which a couple of partial derivatives are calculated.
At the time of publishing this notebook, I'd like to make the resulting equations look the way they would in standard scientific and mathematical writing. Converting the cells in question to TraditionalForm
helps, but falls short of the desired result. The problem is that, in the notebook, what would be traditionally an equation's left- and right-hand sides get split over two ("input" and "output") lines:
(Also, the "input" is in boldface.)
Is there a way to make this look like this?:
Of course, I know that I can get typesetting like the one shown immediately above from Mathematica. In fact I produced this image by cutting and pasting into a new input cell the TraditionalForm
versions shown in the first image, sticking an equal sign in-between the LHSs and RHSs, and getting rid of the boldface. But the result is no longer evaluatable. What I want to know is if there is a way to keep the LHSs evaluatable, but have the output appear to the right of the input, after an equal sign.
(For those who are not very familiar with Mathematica, the question above my seem unreasonable. One has to keep in mind that one of the most consistent themes in Mathematica's history has been to make notebooks approximate as much as possible the literate programming ideal of an "executable essay". The question above is about how to make something that is both executable and has the appearance of a typical mathematical-formulae-containing scientific essay. Then again, the structure of vertically-arrayed cells has been a feature of Mathematica for as long as I can remember, so I realize that what I'm asking for here, however much it may conform with Mathematica's overarching design ideals, may be just too difficult to implement.)
EDIT: The originals of the cells shown above are the last two input-output pairs below. (The code immediately below is an image! I give text versions the input further below. The input shown in the image is as I typed it, and differs from the text versions of the input given later.)
FWIW, here's some code that you can cut-and-paste (although it is not what I actually typed):
Subscript[f, H][k_, t_] := 1/(k t + 1)
Subscript[f, E][k_, t_] := E^(-k t)
D[Log[Subscript[f, H][k, t]], t]
D[Log[Subscript[f, E][k, t]], t]
Note: When converting to TraditionalForm
the formulas where the function's subscript is E
, I had to manually fix the subscript, since Convert To > TraditionalForm
turns it into the special e symbol, the same that is visible on the RHS (e-k t) of the function's definition. (I understand why this happens, but I have not found a better workaround than manual editing; everything else I've tried messes up the appearance of the TraditionalForm
in some other way. For example, if I replace Subscript[f, E]
with Subscript[f, "E"]
, the double quotes turn up in the subscript of the TraditionalForm
, à la "scare quotes".)
Convert To > Traditional Form
. $\endgroup$