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