Re: Subscripts in Text
- To: mathgroup at smc.vnet.net
 - Subject: [mg3258] Re: [mg3218] Subscripts in Text
 - From: jpk at apex.mpe.FTA-Berlin.de (Jens-Peer Kuska)
 - Date: Wed, 21 Feb 1996 02:15:40 -0500
 - Sender: owner-wri-mathgroup at wolfram.com
 
> Hello,
> 
> is there any way to get subscripts in Text? I need that for labeling a
> Graph with "H_2O_2". "_" denotes a subscript.
> 
> Thanks in advance,
> Tobias
Hi Tobias,
here is one solution
In[1]:=
Format[SuperOxide]:=
  SequenceForm[H,Subscript[2],
               O,Subscript[2]]
In[2]:=SuperOxide
Out[2]=
H O
 2 2
(* it will work with the graphics Text-primitive also *)
In[3]:=
Show[
  Graphics[
    Text[
      SuperOxide,{0,0}]
     ]
  ];
Hope that helps 
Jens
==== [MESSAGE SEPARATOR] ====