4
$\begingroup$

In one of the Mathematica (v9) slide templates, they have an example cell that looks like this:

enter image description here

Where there is a "SideCaption" that appears to be the Mathematica-equivalent of a text box to the right of the image. I can't for the life of me figure out how this is replicate this other than copying the cell and pasting elsewhere.

I did find this code looking at the notebook file however:

Cell["SideCaption How do I get this?", "SideCaption"]

Is this something I can generate programmatically, or something that needs to be copied when used elsewhere? I could see this format being used in more places than presentations.

$\endgroup$
8
$\begingroup$
CellPrint@
 Cell[BoxData[
   TagBox[GridBox[{{ToBoxes[Graphics[Circle[]]], 
       Cell["Text", "SideCaption"]}}], "Grid"]], "SideCaptionArray"]

SideCaption and SideCaptionArray are in the Default.nb style sheet if you want to change them.

$\endgroup$
  • $\begingroup$ Nice! I did not know about "SideCaption" and "SideCaptionArray" (edit: I now see that the OP had also mentioned it) $\endgroup$ – rm -rf Mar 13 '13 at 21:23
  • $\begingroup$ Sweeeeeeeeeeeeet. $\endgroup$ – kale Mar 13 '13 at 21:28
4
$\begingroup$

In Mathematica 10.3 we now have TextGrid:

TextGrid[{{Import["ExampleData/ocelot.jpg"], "SideCaption How do I get this?"}}]

enter image description here

and you can edit the text in the output just like in the presentation template.

$\endgroup$

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service, privacy policy and cookie policy

Not the answer you're looking for? Browse other questions tagged or ask your own question.