Re: Output format
- To: mathgroup at smc.vnet.net
- Subject: [mg56071] Re: Output format
- From: "Hans Michel" <hmichel at cox.net>
- Date: Thu, 14 Apr 2005 08:56:42 -0400 (EDT)
- References: <d3iboa$9tr$1@smc.vnet.net>
- Reply-to: "Hans Michel" <hmichel at cox.net>
- Sender: owner-wri-mathgroup at wolfram.com
Attilla:
Try this
\!\(\(\(\ \)\(g\ = \ {150, \(\(163.59156799819695`\)\(\[InvisibleSpace]\)\)
\
- 61.64885169034477`\/\(\[ExponentialE]\^\(\(-12.853120710004662`\)\ \
\((\(-11.234409593431206`\) + t)\)\) +
\[ExponentialE]\^\(1.7252685283232099`\
\ \((\(-11.234409593431206`\) + t)\)\)\)}\)\)\)
Cases[Cases[
Map[XML`Parser`XMLGetString, Map[ToString, Map[MathMLForm, g]]], \
XMLElement[___, ___, {xcel_}] -> xcel, Infinity], _String]
With Mathematica 5.0 on Windows XP.
You can also give TreeForm or CForm or FortanForm a try and parse out the
Mathematica Expression.
This is a quickly thought up solution. It lacks the signs staying with the
numbers and we loose division (mfrac).
Hans
"Csukas Attila" <attila at biking.taiiku.tsukuba.ac.jp> wrote in message
news:d3iboa$9tr$1 at smc.vnet.net...
> Dear All,
>
> I have an output in the following equation form:
>
> \!\({150, \(\(163.59156799819695`\)\(\[InvisibleSpace]\)\) - \
> 61.64885169034477`\/\(\[ExponentialE]\^\(\(-12.853120710004662`\)\ \
> \((\(-11.234409593431206`\) + t)\)\) +
> \[ExponentialE]\^\(1.7252685283232099`\
> \ \((\(-11.234409593431206`\) + t)\)\)\)}\)
>
> I would like to have the numbers with their - signs in different cells
> of Excel format. Now if I export them all (except the first number) is
> crowded to one cell, so a bit messy.
>
> Does anybody have idea on this matter? Any help is appreciated.
>
> "Your beginner admirer"
>
> Attila Csukas
>
>
>