Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2008

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

Search the Archive

Re: Problem with NMinimize

  • To: mathgroup at smc.vnet.net
  • Subject: [mg91583] Re: Problem with NMinimize
  • From: Jean-Marc Gulliet <jeanmarc.gulliet at gmail.com>
  • Date: Thu, 28 Aug 2008 03:17:31 -0400 (EDT)
  • Organization: The Open University, Milton Keynes, UK
  • References: <g93avv$k7g$1@smc.vnet.net>

shama shahbaz wrote:

> i want to minimize the absolute value of this Equation
> e1=((0.0676+0.0067*I)*EXP[p1*I] )+(0.1633-0.0495*I)+(0.0676-0.0555*I)+((0.1633-0.3056*I)*EXP[p2*I]);
> e2=((0.1060-0.0708*I)*EXP[p1*I])+( 0.0708-0.1060*I)+( 0.0293-0.1474*I)+((-0.0439-0.2207*I)*EXP[p2*I]);
> e3=((0.0495-0.1633*I)*EXP[p1*I])+( -0.0067-0.0676*I)+( -0.0873-0.1633*I)+(( -0.0824-0.0676*I)*EXP[p2*I]);
> e4=((-0.0732-0.1768*I)*EXP[p1*I])+( 0*I)+( -0.1768-0.0732*I)+(( 0*I)*EXP[p2*I]);
> e5=((-0.1633-0.0873*I)*EXP[p1*I])+( 0.0676+0.0067*I)+( -0.1633+0.0495*I)+(( 0.0676-0.0555*I)*EXP[p2*I]);
>  
> c1=Abs[e1];
> c2=Abs[e2];
> c3=Abs[e3];
> c4=Abs[e4];
> c5=Abs[e5];
>  
>  
> Minimize[{(c1)2+(c2)2+(c3)2+(c4)^2 +(c5)^2,0=A3p1=A32*Pi,0=A3p2=A32*Pi},{p1,p2}]
>  
>  
> but it did not give me any answer

In[167]:=
e1 = ((0.0676 + 0.0067*I)*Exp[p1*I]) + (0.1633 -
      0.0495*I) + (0.0676 - 0.0555*I) + ((0.1633 - 0.3056*I)*
      Exp[p2*I]);
e2 = ((0.1060 - 0.0708*I)*Exp[p1*I]) + (0.0708 -
      0.1060*I) + (0.0293 - 0.1474*I) + ((-0.0439 - 0.2207*I)*
      Exp[p2*I]);
e3 = ((0.0495 - 0.1633*I)*Exp[p1*I]) + (-0.0067 -
      0.0676*I) + (-0.0873 - 0.1633*I) + ((-0.0824 - 0.0676*I)*
      Exp[p2*I]);
e4 = ((-0.0732 - 0.1768*I)*Exp[p1*I]) + (0*I) + (-0.1768 -
      0.0732*I) + ((0*I)*Exp[p2*I]);
e5 = ((-0.1633 - 0.0873*I)*Exp[p1*I]) + (0.0676 +
      0.0067*I) + (-0.1633 + 0.0495*I) + ((0.0676 - 0.0555*I)*
      Exp[p2*I]);

c1 = Abs[e1];
c2 = Abs[e2];
c3 = Abs[e3];
c4 = Abs[e4];
c5 = Abs[e5];

NMinimize[{(c1) 2 + (c2) 2 + (c3) 2 + (c4)^2 + (c5)^2,
   0 <= p1 <= 2*Pi, 0 <= p2 <= 2*Pi}, {p1, p2}]


Out[177]= {0.460851, {p1 -> 2.06579, p2 -> 4.11334}}

Regards,
-- Jean-Marc


  • Prev by Date: Re: Problem with NMinimize
  • Next by Date: Re: Problem with NMinimize
  • Previous by thread: Re: Problem with NMinimize
  • Next by thread: Re: Problem with NMinimize