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

RE: Help

• To: mathgroup@smc.vnet.net
• Subject: [mg11151] RE: [mg11115] Help
• From: BobHanlon@aol.com
• Date: Mon, 23 Feb 1998 21:41:10 -0500

soln ={{a -> 32}, {a -> -22}, {a -> 49}};

To get the substitution rules with positive values, do the following:

Select[soln, (a /. #) > 0&]

{{a -> 32}, {a -> 49}}

If all you want are the positive values themselves, then use:

Select[a /. soln, # > 0&]

{32, 49}


Bob Hanlon

FORWARDED MESSAGE:

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]]
];

Howver, it doesnt seem to work the way I want.

Thanks

Colin