MathGroup Archive 2005

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

Search the Archive

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/


  • Prev by Date: Re: Re: Some bugs in Mathematica
  • Next by Date: Mathematica takes wrong derivative
  • Previous by thread: Re: NSolve problem
  • Next by thread: Re: NSolve problem