MathGroup Archive 2003

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

Search the Archive

Re: FindMinimum Problem


Hi,

you ust make a function

foo[x_?NumericQ]:=x^2-a[0]*x/.NDSolve[{a'[z]==x*z,a[1]==1},a,{z,0,1}]

FindMinimum[foo[x],{x,-1,1}]

Regards
  Jens

Jiang Xiao wrote:
> 
> Hi, all,
>     recently I am dealing with a problem as following, findminimum(over x)
> of a function f[a[0],x], where a[z] satisfies a differential equation
> a'[z]=x*z say. The code is like:
> FindMinimum[x^2-a[0]*x/.NDSolve[{a'[z]==x*z,a[1]==1},a,{z,0,1}],{x,-1,1}]
> 
> the problem is that I can do it in mathematica 4.2, but can't in mathematica
> 5.0 now. Do anybody where is the problem?
> 
> thanks,
> 
> Jiang


  • Prev by Date: Re: filled plot on part of x-interval
  • Next by Date: Re: Improper integral
  • Previous by thread: FindMinimum Problem
  • Next by thread: Re: FindMinimum Problem