I'm trying to get a Cell to appear in TraditionalForm when using
NotebookWrite. Here is the closest I can get:
nb = CreateDocument; NotebookWrite[nb, Cell["Hello", "Section"]]; NotebookWrite[nb, Cell[BoxData@ToBoxes@TraditionalForm@"HI", "Text"]];
I get the following:
What do I need to do to get "HI" to appear in TraditionalForm?
Here's a better example:
nb = CreateDocument; NotebookWrite[nb, Cell[BoxData[ToBoxes[Sin[x]^2]], "Output"]];
whereas I'd like the output to look like
Is there a specific option I need?