RE: List of solution
- To: mathgroup at smc.vnet.net
- Subject: [mg46984] RE: [mg46977] List of solution
- From: "Florian Jaccard" <florian.jaccard at eiaj.ch>
- Date: Thu, 18 Mar 2004 04:37:44 -0500 (EST)
- Reply-to: <florian.jaccard at eiaj.ch>
- Sender: owner-wri-mathgroup at wolfram.com
Hello !
C'est très simple :
In[4]:=
liste = {{x -> 0, y -> 0}, {x -> 1, y -> 0},
{x -> I, y -> 1 + 2*I}}
Out[4]=
{{x -> 0, y -> 0}, {x -> 1, y -> 0},
{x -> I, y -> 1 + 2*I}}
In[5]:=
DeleteCases[liste, {x -> xx_, y -> yy_} /;
Im[xx] != 0 || Im[yy] != 0]
Out[5]=
{{x -> 0, y -> 0}, {x -> 1, y -> 0}}
Meilleures salutations
Florian Jaccard
-----Message d'origine-----
De : Clément [mailto:rusheraquatic at ifrance.com]
Envoyé : jeu., 18. mars 2004 07:25
À : mathgroup at smc.vnet.net
Objet : [mg46977] List of solution
Hello MathGroup,
I have resolved an equation. So i have a list of solution like : {{x->0,
y->0}{x->1, y->0}{x->i, y->1+2i}}
I want to remove the complex solutions of this list.
How can i do ?
Thanks