       Re: how to get rid of extra parentheses ?

• To: mathgroup at smc.vnet.net
• Subject: [mg92526] Re: how to get rid of extra parentheses ?
• From: Peter Pein <petsie at dordos.net>
• Date: Thu, 2 Oct 2008 18:48:43 -0400 (EDT)
• References: <gc2167\$qa4\$1@smc.vnet.net>

```Say you've got this result:
In:= result = {{cb*S*(V/2)}};

Take the first element of the first sublist:
In:= desiredResult = result[[1,1]]
Out=
(cb*S*V)/2

If you get deeper nested results like:
In:= r5 = Nest[List, cb*S*(V/2), 5]
Out=
{{{{{(cb*S*V)/2}}}}}

then you can flatten this structure to a simple list and take the first part
In:= First[Flatten[r5]]
Out=
(cb*S*V)/2

which gives the same result as this  step-by-step-method:
In:= NestWhile[First, r5, ListQ]
Out= (cb*S*V)/2

hth,
Peter

Obaid Rehman schrieb:
> Hi , there
>
>
>
> I am wondering if some one can help me in my issue.
>
>
>
> After some Algebraic manipulation I get the result but it is inside the
> two parenthesis e.g. {{...........  }}. The problem is that Mathematica
> understand it as a list or matrix entry.
>
> If I need to use this result directly into the matrix manipulation it
> gives the error. Question is how to get rid these extra parentheses in
> the result that Mathematica add itself?
>
>
>
> e.g
>
>
>
> {{cb S V/ 2}}
>
>
>
> U can see there is no need of these extra parenthesis
>
> Obaid
>
>

```

• Prev by Date: Re: Print A Math Formula In Formatted Notebook
• Next by Date: Re: how to get rid of extra parentheses ?
• Previous by thread: Re: how to get rid of extra parentheses ?
• Next by thread: Re: how to get rid of extra parentheses ?