Services & ResourcesWolfram ForumsMathGroup Archive

[Date Index] [Thread Index] [Author Index]

a bad demonstration of Mathematica's MathML capabilities

• To: mathgroup at smc.vnet.net
• Subject: [mg58871] a bad demonstration of Mathematica's MathML capabilities
• From: Chris Chiasson <chris.chiasson at gmail.com>
• Date: Thu, 21 Jul 2005 15:46:02 -0400 (EDT)
• Reply-to: Chris Chiasson <chris.chiasson at gmail.com>
• Sender: owner-wri-mathgroup at wolfram.com

Dear Mathgroup,

I made the following cell with a gridbox table, displayed it in
TableForm, exported and reimported in MathML format (via ExportString
and ImportString), then finally displayed the imported result with
TableForm.

How does Wolfram expect me to be able to reproduce the table outside
of Mathematica if it can't even import it's own table correctly?

Please let me know if you think I did something incorrectly...

Remember to paste after Ctrl+Shift+E...

Cell[BoxData[{
    RowBox[{
      RowBox[{"rawdata", "=", GridBox[{
            {"\[Placeholder]", "\"\<0.10\>\"", "\"\<0.10\>\"",
"\"\<0.10\>\"", "\"\<55.4\>\"", "\[Placeholder]"},
            {"\[Placeholder]", 
              RowBox[{" ", "\"\<mM\>\""}], "\"\<mM\>\"", "\"\<mM\>\"",
"\"\<M\>\"", "\[Placeholder]"},
            {"\[Placeholder]", 
              RowBox[{" ", "\"\<NaCl\>\""}], "\"\<\!\(CaCl\_2\)\>\"",
"\"\<\!\(C\_6\)\!\(H\_4\)-1,2-\!\(\((COOH)\)\_2\)\>\"",
              "\"\<\!\(H\_2\)O\>\"", "\"\<\[CapitalLambda]\>\""},
            {"\"\<Soln\>\"", "\"\<(mL)\>\"", "\"\<(mL)\>\"",
"\"\<(mL)\>\"", "\"\<(mL)\>\"", "\"\<(mS)\>\""},
            {"1", "0", "0", "25", "25", "0.16"},
            {"2", "25", "0", "25", "0", "0.20"},
            {"3", "50", "0", "25", "0", "0.20"},
            {"4", "75", "0", "25", "0", "0.18"},
            {"5", "0", "25", "25", "0", "0.21"},
            {"6", "0", "50", "25", "0", "0.24"},
            {"7", "0", "75", "25", "0", "0.24"},
            {"8", "25", "0", "50", "0", "0.23"},
            {"9", "0", "25", "50", "0", "0.26"}
            }]}], ";"}], "\[IndentingNewLine]", 
    RowBox[{"rawdata", "//", "TableForm"}], "\[IndentingNewLine]", 
    RowBox[{
      RowBox[{"ToExpression", "@", 
        RowBox[{"ImportString", "[", 
          RowBox[{
            RowBox[{"ExportString", "[", 
              RowBox[{"rawdata", ",", "\"\<MathML\>\""}], "]"}], ",",
"\"\<MathML\>\""}], "]"}]}], "//", "TableForm"}]}], "Input",
  CellLabel->"In[31]:="]

Regards,
-- 
Chris Chiasson
http://chrischiasson.com/
1 (810) 265-3161

• Follow-Ups:
  • Re: a bad demonstration of Mathematica's MathML capabilities
    • From: Chris Chiasson <chris.chiasson@gmail.com>