MathGroup Archive 2002

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

Search the Archive

Re: FindRoot and Inequalities

  • To: mathgroup at smc.vnet.net
  • Subject: [mg37746] Re: FindRoot and Inequalities
  • From: "Allan Hayes" <hay at haystack.demon.co.uk>
  • Date: Mon, 11 Nov 2002 05:10:03 -0500 (EST)
  • References: <aqi7j0$6av$1@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

George,
You might find the new, in Mathematica 4.2, standard package
NumericalMath`NMinimize useful:

    << NumericalMath`NMinimize`

    conds = {(Sin[x] - 3/4)^2, 2*Pi < x < 3*Pi};

    NMinimize[conds, {x}]

    NMinimize::strong:Strong inequality has been changed to a weak
inequality.

    {1.232595164407831*^-32, {x -> 7.131247386161068}}

Check that the conditions are satisfied

    conds /. %[[2]]

    {1.232595164407831*^-32, True}

--
Allan

---------------------
Allan Hayes
Mathematica Training and Consulting
Leicester UK
www.haystack.demon.co.uk
hay at haystack.demon.co.uk
Voice: +44 (0)116 271 4198
Fax: +44 (0)870 164 0565


"George Thiel" <thiel at us.ibm.com> wrote in message
news:aqi7j0$6av$1 at smc.vnet.net...
> Hi All
> I'm trying to solve a system of nonlinear algebraic equations.
> I was hoping to use the FindRoot.  However,  some
> of the variables for which I'm solving must satisfy some
> inequalities.   Is there an easy way to impose these constraints
> in the solution?
>
> Thanks in advance
> George
> (KthielK at us.ibm.com)
> (remove the Ks to reply via email)
>
>
>




  • Prev by Date: Re: FindRoot and Inequalities
  • Next by Date: Re: TeXForm and array-like output
  • Previous by thread: Re: FindRoot and Inequalities
  • Next by thread: AW: Plotting a circle...