       Re: Output format

• To: mathgroup at smc.vnet.net
• Subject: [mg56049] Re: Output format
• From: Peter Pein <petsie at arcor.de>
• Date: Thu, 14 Apr 2005 08:54:56 -0400 (EDT)
• References: <d3iboa\$9tr\$1@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

```Csukas Attila wrote:
> 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.
>
>
> Attila Csukas
>
>
>
If I understand you correctly:
In:=
data = {150, 163.59156799819695 - 61.64885169034477/
(E^(-12.853120710004662*(-11.234409593431206 + t)) +
E^(1.7252685283232099*(-11.234409593431206 + t)))};
In:=
Cases[data[], x_Real, Infinity]
Out=
{163.59156799819695, -61.64885169034477, -12.853120710004662,
-11.234409593431206, 1.7252685283232099, -11.234409593431206}

??

--
Peter Pein
Berlin

```

• Prev by Date: Re: Output format
• Next by Date: Re: Algebra in Mathematica
• Previous by thread: Re: Output format
• Next by thread: Re: Output format