Re: Help
- To: mathgroup@smc.vnet.net
- Subject: [mg11164] Re: [mg11115] Help
- From: Tomas Garza <tgarza@mail.internet.com.mx>
- Date: Wed, 25 Feb 1998 03:31:40 -0500
Colin wrote:
> I have 3 solutions for a which are
> {a -> 32, a -> -22, a -> 49}.
>I want to use the positive answer to sub in a folowing equation.
>The code that I wrote is
> aList = Re[Last/@Flatten[%]];
> aList = Select[%, #>0 &];*)
> For[
> m = 1, m < size, m++, aList[[m]]
> ];
Colin,
Most likely your solutions will be in the form
b = {{a -> 32}, {a -> -22}, {a -> 49}}
If you want to pick the positive values, try
In[1]:= Select [Table[a/.b[[j]], {j,1,3}], # > 0 &]
Out[1]= {32, 49}
Good luck,
Tomas Garza
Mexico City