Re: Problem with Integrate and FindMinimum

• To: mathgroup at smc.vnet.net
• Subject: [mg49593] Re: Problem with Integrate and FindMinimum
• From: pnardon <pnardon at ulb.ac.be>
• Date: Sat, 24 Jul 2004 03:47:23 -0400 (EDT)
• References: <cdqpss\$kh4\$1@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

```csg at umich.edu wrote:

> Hi I'm having a problem with Mathematica. I'm trying to find the minimum of a
> function f[a,b,...] defined as
>
> f[a,b,...]:=NIntegrate[h[x,a,b,...],{x,-inf,inf}]
>
> where h[x,a,b,...] is some complicated function. I'm trying to use FindMinimum
> to find the values of a,b,... that minimize f[a,b,...] but everytime I try to
> use Find Minimum I get the error message "Inegrand h[] is not numerical at
> *some point r*". I'm running Mathematica 5.0 student version at Windows XP.
>

Why don't you just try
to have a set of equations like:

eq[a]=NIntegrate[D[h[x,a,b,...],a],{x,-inf,inf}]==0
eq[b]=NIntegrate[D[h[x,a,b,...],b],{x,-inf,inf}]==0

Then Solve this set
Solve[{eq[a],eq[b],...},{a,b,...}]

just to see...

If you can post the function h[x,a,b,...] it could be more clear.

BestRegards

```

• Prev by Date: Bug? Wrong result from infinite sum.
• Next by Date: RE: Spacing of Words in Text Graphics Statements
• Previous by thread: Re: Problem with Integrate and FindMinimum
• Next by thread: NonlinearFit works not so good