Re: NSolve problem
- To: mathgroup at smc.vnet.net
- Subject: [mg59658] Re: NSolve problem
- From: Paul Abbott <paul at physics.uwa.edu.au>
- Date: Tue, 16 Aug 2005 04:39:48 -0400 (EDT)
- Organization: The University of Western Australia
- References: <dcsc67$q0k$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
In article <dcsc67$q0k$1 at smc.vnet.net>,
Enrique Zeleny <ezeleny at fcfm.buap.mx> wrote:
> I f I try to solve these equations
>
> Solve[{2 x + 3 y == 8 + I 7,
> 3 x + y == 5 + 7 I, -2 I x + (1 + 3 I) y == 3 + 5 I}]
>
> the result is
>
> {{x -> 1 + 2*I, y -> 2 + I}}
>
> but if I have
>
> Solve[{2 x + 3 y == 8 + I 7,
> 3 x + y == 4.99999999999999 + 7 I, -2 I x + (1 + 3 I) y == 3 + 5 I}]
Further to my previous posting, here is another approach:
pinv = PseudoInverse[{{2, 3}, {3, 1}, {-2 I, 1 + 3 I}}]
pinv . {8 + 7 I, 4.99999999999999 + 7 I, 3 + 5 I}
Cheers,
Paul
--
Paul Abbott Phone: +61 8 6488 2734
School of Physics, M013 Fax: +61 8 6488 1014
The University of Western Australia (CRICOS Provider No 00126G)
AUSTRALIA http://physics.uwa.edu.au/~paul
http://InternationalMathematicaSymposium.org/IMS2005/