subscripts and strings
- To: mathgroup at smc.vnet.net
- Subject: [mg28298] subscripts and strings
- From: Matt.Johnson at autolivasp.com
- Date: Sat, 7 Apr 2001 03:44:59 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Hello everybody...
Here's something quirky...suppose I have some subscripted variables. Then,
I want to combine these into a string, such as in a chemical formula. So I
have the element names subscripted by the number of atoms, such as
water={Subscript[H,2],O}
then I want to combine the list into a string, H_2O (let the underscore
denote a subscript). This is where I run into problems. For some reason,
when ToString is mapped through the list, Mathematica interperets the subscripts as
newlines. So the question is, either how do I get the subscripted element
expression to be a string, or is there another way to combine these
altogether?
Thanks,
-matt
Here's a quick synopsis:
In[41]:=
\!\(\(list = {s\_1, s\_2, s\_3};\)\n
StringJoin[list]\)
\!\(List::"string" \(\(:\)\(\ \)\)
"String expected at position \!\(1\) in \!\({s\_1, s\_2, s\_3}\)."\)
\!\(List::"string" \(\(:\)\(\ \)\)
"String expected at position \!\(2\) in \!\({s\_1, s\_2, s\_3}\)."\)
\!\(List::"string" \(\(:\)\(\ \)\)
"String expected at position \!\(3\) in \!\({s\_1, s\_2, s\_3}\)."\)
General::"stop": "Further output of \!\(List :: \"string\"\) will be \
suppressed during this calculation."
Out[42]=
\!\(s\_1 <> s\_2 <> s\_3\)
In[43]:=
StringJoin[ToString /@ list]
Out[43]=
"s\n 1s\n 2s\n 3"
In[44]:=
% // InputForm
Out[44]//InputForm=
"s\n 1s\n 2s\n 3"
In[45]:=
\!\(\(list2 = {\*"\"\<\!\(s\_1\)\>\"", \*"\"\<\!\(s\_2\)\>\"", \
\*"\"\<\!\(s\_3\)\>\""};\)\[IndentingNewLine]
StringJoin[list2]\)
Out[46]=
\!\("\!\(s\_1\)\!\(s\_2\)\!\(s\_3\)"\)
In[47]:=
InputForm[%]
Out[47]//InputForm=
"\!\(s\_1\)\!\(s\_2\)\!\(s\_3\)"
**************************************************************************************************************************************
All Autoliv e-mails remain Company property and shall be used for
business-related purposes only. Do not forward any material contained
within this e-mail without prior, written permission from the author's
manager. Autoliv disclaims all responsibility and accepts no liability
(including negligence) for the consequences for any person acting, or
refraining from acting on this information prior to the receipt by those
persons of subsequent written confirmation.
**************************************************************************************************************************************